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GESPAC Gives You 
68000 Performance at 8-bit Prices. 




Introducing another Price / Performance 
breakthrough from GESPAC: A complete 68000 
CPU module for $395 unit price. The GESMPU-48. 

Wherever you thought of using on 8-bit 
microprocessor to do a job, you con now use the 
16/32-bit GESMPU-48 instead. It will do the job, 
better, faster, and best-of-all for the some money. 

On a single height Eurocard, we have packed on 
8 MHz 68000 microprocessor (16 MHz optional), 
four sockets for up to 64 Kilobytes of zero-wait-states 
CMOS RAM and up to 128 Kilobytes of EPROM, 
one RS-232 serial port, and three 16-bit timers. 

The GESMPU-48 is fully expandable through 
the standard G-64 bus, to accommodate up to 
16 Megabytes of external memory. You can add 
any of more than 300 I/O modules available from 
GESPAC and a growing numbers of independent 
G-64 bus vendors. 



To make your programming tasks easier, 
GESPAC supports the GESMPU-48 with the OS-9* 
and POOS® real-time, multi-tasking operating 
systems and most popular high level languages 
and software development tools. 




.00 



Single Quantity 



$316 e 

100 



MPU-4B SNI 00030 i 
Actual Size 



If you too like the ideo of getting more for 
less, contact us today to receive information 
on the GESMPU-48 and the G-64 bus concept 
from GESPAC— the leader in single Eurocard 
microcomputer products worldwide. 

Call Toll Free 1-800-4-GESPAC 
or Call (602) 962-5559. 



:ai 



IN USA -CAN ADA 

50A West Hoover Ave. 
Mesa, Arizona 85202 
Tel. (602) 962-5559 
Telex 386575 



INTERNATIONAL 

3, chemin des Aulx 
CH -1228 Geneva 
Tel. (022) 713400 
Telex 429989 



(^MgnJO-WnnngnwrKlmxIxTKirlnctGESMCM OS-» n o rngMemJ trndwiwrt o» MbHnn, Carp. KXXna npund lrod.morV of Eyrmg fcwartti Imhwlr* 



GmX Micro -20 

68020 SINGLE-BOARD COMPUTER 



Mainframe CPU Performance 
on a 5.75" x 8.8" Board 

(benchmark results available on request) 



$2565 



00 12.5 MHz Version 

Quantity Discounts Available 




Features 



Software 



32-Bit MC68020 Processor (12.5. 16.67, or 

20MHZ) 

MC68861 Floating-point coprocessor (optional) 

2 Megabytes ol 32-bit wide, high-speed RAM 

4 RS-232 Serial i/0 Ports (expandable to 36) 

8-bit Parallel 1/0 Port ('Centronics' compatible) 

Ttme-ol-Oay Clock w batteiy backup 

16-bit I/O Expansion Bus 

Up to 256 Kbytes ol 32-bit wide EPROM 

Floppy Disk Controller tor two 5'A" drives 

SASI intelligent Peripheral Interface (SCSI subset) 

Mounts directly on a 5Y«" Disk Drive 

Optional Boards Include Arcnet. Prototyping. 1/0 

Bus adapter, 60 line Parallel I/O. RS-422/485 



Included: 

• GMX Version ol Motorola's 020Bug Debugger with 
up/download, breakpoint, trace, single-step, and 
assembler / disassembler capabilities 

• Comprehensive Hardware Diagnostics 
Optional: 

tfWX™ like Multi-user/ Multi-tasking 
Disk Operating Systems 

• OS-9/68000™ (Real-time and PROMable) 

• UniFLEX™ 

Programming Languages and Application 
Software 

• BASIC, C. PASCAL, ABSOFT FORTRAN, COBOL 
and ASSEMBLER 

• Spreadsheet, Data Base Management, and Word 
Processing 

COMPLETE EVALUATION SYSTEMS AVAILABLE 



CfTlX 1337 W. 37th Place Chicago, IL 60609 
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tion. No blue ink! No hand wiittert ankles - please! Diagrams o.k. 
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EXCITING SOFTWARE FROM THE LEADER. 



OS-9 ELECTRONIC MAIL 

Clash your message on Electronic Mail Mail is a 
screen- or line-oriented program that runs on your 
OS 9/680X0 systems or over OS-9/NKT Yuu can use 
distributed mailing lists or consecutive mailing list to 
get your message delivered And received mail can be 
sent directly to your printer for immediate printout, 
spooled on a multiuser system or saved to a file Mail 
features on-line help and complete, easy to understand 
documentation. 
Electronic Mail $150.00. 




OS-9/ST 

NEW for your Atari ST! Now you can have the power of 
OS 9 on your Atari 520 or 1040 ST. A true 
multi tasking environment for professional real time 
results, OS 9/ST is available in two configurations: 
Personal ami Professional Choose either version for 
true multi user support And all at a price that puts 
II N IX toshame 

Personal OS 9/ST combines the power of OS 9 with 
an interactive, structured Basic $150.00 



PRINT SPOOLER 

Spool it and Print it! Someone beat you to the printer? 
Don't blow your top while you cool your heels-get the 
OS 9/68000 Print Spooler and relax The full featured 
Print Spooler automatically routes and monitors the 
status of your devices and the output files to he spooled 
Now you can have a complete print spooling manage 
mentsystem at an affordable price. 
OS 9 Print Spooler $150.00 

FORTRAN 

Crunch It! with Our New I'ORTKAN 77 Compiler Now 
you have a powerful new tool to take full advantage of 
the 68010 family of microprocessors. With Microware's 
KORTRAN 77 Compiler you can generate code that uses 
system-wide modules instead of linking redundant 
copies of the standard library to each program. Result: 
less memory, less disk space, faster loading and 
externa) updating! 
FORTRAN 77 Compiler $750.00 



Professional OS 9/ST has a powerful Assembler, 
Linker and User Debugger and the tools to turn 
your Atari ST into a full C Language 
workstation. $600.00 

OS-9/68020 C COMPILER 

NEW "speed demon" C Compiler! Now you can get your 
hands on a highly optimized C language pawer 
tool the OS 9/68020 C Compiler When coupled with 
the MC6888I math co-processor, this compiler will let 
you'll blast through complex math functions in the 
blink of an eye All compiler/assembler/linker options 
arc controlled hy an intelligent compiler executive that 
spares you from memorizing compiler options and 
module calling sequences And the compiler includes 
library functions for memory management and system 
events, and much, much more! The new OS 9/68020 C 
Compiler is included with the Professional OS 9/68020 
System Software Package 
NewC language Compiler $750.00 



To order these exciting N KW products or for more information,.. 

Microware Systems Corporation 

1900 N W 1 14th Street* Des Moines, Iowa 50322 
Phone 51 5 224 1929 • Telex 911) 520 2535 



CALL TODAY! 



West Coast Office 

4401 Great American Parkway • Suite 220 
Santa Clara, California 95054 



Microware Japan. Ltd. 

4119 lloncho 4 Chome, Eunabashi City • Chiba 273, 

Japan • Phone 0473 (28) 4493 • Telex 781 299 3 122 
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Microware is on the move Wt have openings for Technical and Marketing Professionals. 

Send your resume (in confidence) today and find out more about these exciting opportunities. 

OS-fl and BASIC09 am tradamaiits & Microwarv and Motorola UNIX la a trademark ot Ban Laboratonaa. Inc 
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Per SBC 





DATA-COMP proudly presents the first 
Under $5000 "SUPER MICRO". 

The MUSTANG.020™ 



MUSTANG-020- 



The MUSTANG -020 68020 SBC 
provides a powerful, compact, 32 bit computer 
system featuring the "state of the an" Motorola 
68020 "super" micro-processor. It comes 
standard with 2 megabyte of high-speed SIP 
dynamic RAM, serial and parallel pons, floppy 
disk controller, a SASI hard disk interface lor 
intelligent hard disk controllers and a battery 
backed-up time-of-day clock. Provisions are 
made for the super powerful Motorola MC6888 1 
floating point math co-processor, for heavy math 
and number ciunching applications. An optional 
network interface uses one serial (four (4) 
standard, expandable to 20) as a 125/bit per 
second network channel. Supports as many as 32 
nodes. 

The MUSTANG-020 is ideally suited to a 
wide variety of applications. It provides a cost 
effective alternative to the other MC68020 
systems now available. It is an excellent 
introductory tool to Ihe world of hi-power, hi- 
speed new generation "super micros". In 
practical applications it has numerous 
applications, ranging from scientific to education. 
It is already being used by government agencies, 
labs, universities, business and practically every 
other critical applications center, worldwide, 
wheie true multi-user, multi-tasking needs exist. 
The MUSTANG020 is UNIX C level V 
compatible. Where low cost and power is a must, 
the MUSTANG-020 is the answer, as many have 
discovered. Proving that price is not the standard 
for quality! 

As a software development station, a 
general purpose scientific or small to medium 
business computer, or a super efficient real-time 
controller in process control, the MUSTANG- 
020 is the cost effective choice. With the optional 
MC68881 floating point math coprocessor 

installed, it has the capability of systems cosdng 
many times over it's total acquisition cost. 



DATA-COMP , 
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With the DATA-COMP "total package", 
consisting of a heavy duty metal cabinet, 
switching power supply with if/line by-passing, 
5 inch DS/DO 80 track floppy. Xebec hard disk 
controller, 25 megabyte Winchester hard disk, 
four serial RS-232 pons and a UNIX C level V 
compatible multi-tasking, multi-user operating 
system, the price is under $5000, w/12.5 
megahertz system clock (limited time offer). 
Most all popular high level languages are 
available at very reasonable cost. The system is 
expandable to 20 serial poits, at a cost of less 
than $65 per port, in multiples of 8 port 
expansion options. 

The system SBC fully populated, quality 
tested, with 4 serial ports pre-wired and board 
mounted is available for less that $3000. Quantity 
discounts are available for OEM and special 
applications, in quantity. All that is required to 
bring to complete "system" standards is a 
cabinet, power supply, disks and operating 
system. All these are available as separate items 
from DATA-COMP. 
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A special version of the Motorola 020- 
BUG is installed on each board. 020 BUG is a 
ROM based bebugger package with facilities for 
downloading and executing user programs from 
a host system. It includes commands for display 
and modification of memoiy, breakpoint 
capabilities, a powerful assembler/disassemble 
and numerous system diagnostics. Various 020- 
BUG system routines, such as I/O handlers are 
available for user programs. 

Normal system speed is 3-4.5 MIPS, with 
burst up to 10 MIPS, at 16.6 megahertz. 
Intelligent I/O available for some operating 
systems. 

Hands-on "actual experience sessions", 
before you buy, are available from DATA- 
COMP. Call or write for additional information 
or pricing. 
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Muatang-020 Mustang 08 Benchmarks 



| IBM AT 7.100 Xenix Sya 3 

. AT4T 7100 UNIX PC oiOlO 

I DEC VAX 11/7(0 UNIX Berkley 4.2 

1 DEC VAX 11/710 

I 64004 03-9 CtK • MM 
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Special for «uns*olo MUST ANO-GWT' 

1695.00. SAVE SXO.OO 

Sofoajre Dtrcraintr 

AD MUSTANO-O20*" ryiKm and Heard buyue •» 
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50100 
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$450,00 
150.00 
330. 00 
300 00 
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V50 00 
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12,5 Mhl (optional 16.6 Mhi available) MC68020 full 32-b II wide pith 

32-bll wide data and address buses, non-multiplexed 

on chip Instruct ion cache 

object code compatible with ill 68XXX family pnxEssom 

enhanced Instruction r^-malhco-pnxxasor Interface 

66881 math hl-speei floating point co^nactBasr (optional) 

direct cxtenaion of full 66020 Instruction act 

full support IEEE PTH draft 10.0 

transcendental and other sdciillflc math functions 

2 Megabyte of SIP RAM (S12 x 32 bit organization) 

up lo 256K bytes of EPRGM (64 x 33 bltf) 

4 Asynchronous aerial I/O ports atari dard 
optional Is 20 soil] ports 
■tandaid RS-232 inteifacv 
optional network Inlcrfaae 
buffered Sbll parallel port (172 MC6S230) 
Centronics type plnout 
czpaAs Ion connector fur t/O devices 
16 bit data path 
256 byte address spase 
2 interrupt Inputs 
dock and control signals 
Motorola I/O Channel Modules 
time of day dock/calcnd nr w/batlay backu p 
controller (or X 5 V4" floppy disk drives 
■ingle or double side, single or double density 
35 lo SO track selectable (48-96 TPI) 
SASIfntciface 

piograxnmablc periodic Interrupt generator 
Interrupt rate from micrD-sccD nds lo seconds 
highly accurate lime base (51'1'Mj 

5 bit sense switch, readable by the CPU 
Hardwarealngle-step capability 




Don't be mislead! 

ONLY Data-Comp 

delivers the Super 

MVSTANG-020 



Then lii-apttd 68020 ryflmu arc presently world/is. u 

NASA. Atomic Entrty ComnuuuM, Ga*tnuntnl 

Arrncjar as wrrir as (/wrrrnorr. fiuirutr. Labs, and 

OlMtr Critical Applications Ccnlsrs. wcfdiwtoc, where, ■ptaat, math 

crunotiiruj and aejttfj .*str, tmJdiarHnl UNIX C (awfl V oompautslity 

and low cron ii a auurt 



Only the"PRO" version 

of 

OS-9 supported! 

®> 
This is HEAVY DUTY 

Country! 



MUSTANG-02* SBC 


53494.80 


Cabinet w/swilchlng PS 


3399.95 


5* -88 track floppy 


DS/SD $269.95 


Floppy cabtt 


$39.95 


OS-9 «IK Profesfdonal Ver. 


$850.00 


• Includes C Compiler ($500.00) 




W nctieiler cable 


$39.95 


Winchester Drive 25 Mbyte 


$895.00 


lUrdUkkaontroller 


$395.00 


Shipping USA UPS 


$20.00 



ol 
120.00 



JI93.00 



UPGRADES 

Write or Call 

for Professional 

OS-9 "Full Bore" 

Upgrade Kit 



For a MM om» »• wm oft* * **00 • 
I trarJa-tn on your ok) riexxx SBC. Mutt j 

. be wrlwj pwoparly arn! comoWa war; j 
I si aofr*«. ca caas and occumaraaiion. ) 
CaJ for more trt ormatrxt. 



Data-Comp Division 



% 



F^\ A Decade of Quality Service" ^ 

Si/ste>rnj> Wariil-Wkle 

Computer Publishing. Inc. S900 Cassandra Smith Road 
Telephone 615 B42-4B01 - Telex S10 600-6630 Htrson. Tn 37343 



25 



85 



total: Save $1000.00 $s.2»».m 
complete sytcm $4,299.80 

UruFLEX Less $100.00 

MC68eat l/pmatfiBfOOOssof Add $275.00 

16.67 Uiz MC68020 $375 00 

16.67 Miz MC6888 1 JJ875 00 

20 M iz MCS B020 Sys $750 ,00 
No» alt 6888 1 criips work with 20 M » Sys 



NOTE: Only Professional OS-9 

now available (68020 Version) 

Includes ($500.00) C Compiler 

68020 & 68881 supported 

complete 

Mbyte HD System 

$4299.80 
Mbyte HD System 

$5748.80 
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With , C Source 



$229.00 



$®M\ 



iJMhfi 

A Division of 
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\_s T» 3900 Guud*» Smi* M. 

r* lluuoo, Tn 37M3 

¥ Tll«*om 615 M2 -6809 

1 T.1MS106COMM 
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PAT FROM S. E. MEDIA - A FULL FEATURED SCREEN ORIENTED TEXT EDITOR 

with all the best of PIE. For those who swore by and loved PIE, this is for YOU! All PIE 
features & much more! Too many features to list. And if you don't like ours, change or add 
your own. C source included. Easily configured to your CRT terminal, with special configuration 
section. No sweat! 

68008 - 68000 - 68010 - 68020 OS-9 68K $229.00 



COMBO 



PATfJUST 

Special $249.00 

JUST 

JUST from S. E. MEDIA - - Text formatter written by Ron Anderson; for dot matrix 
printers, provides many unique features. Output formatted to the display. User con- 
figurable for adapting to other printers. Comes set-up for Epson MX80 with Graflex. Up 
to 10 imbedded printer control commands. Compensates for double width printing. 
Includes normal line width, page numbering, margin, indent, paragraph, space, vertical 
skip lines, page length, centering, fill, justification, etc. Use with PAT or any other text 
editor. The ONLY stand alone text processor for the 68XXX OS-9 68K, that we have 
seen. And at a very LOW PRICE! Order from: S.E. MEDIA - see catalog this issue. 

68008 - 68000 - 68010 - 68020 OS-9 68K 
V With 'C source $79.95 
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An Ace of a System in Spades! The New 

MUSTANG-08/A 



Now with 4 serial ports standard At speed increase to 12 Mhz CPU + on board battery 
backup and includes the PROFESSIONAL OS-9 package - including the $500.00 OS-9 

C compiler! This offer won't last forever! 



NOT 128K, NOT 512K 
FULL 768K No Wait RAM 

The MUSTANGtiB™ ystem look every hand from ail 
other 66006 sysems we tested, running OS-9 68K! 

The MU5TAN&08 ndudes OS9«6K™ andor Peter 
Stark's SK'DOS . SK'OOS is a ingle user, single tasking 
system that takes up where *FLEX™ left off. SK'DOS is 
actuaty a 58XXX FLEX type system {Not a TSC poduct) 

emfB sfufj btownrfTwUHser . <nuti- ^\ 
Alike riopular 68000 OKksMtwate 
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INTRODUCTION 

This chapter continues the discussion of the 
conversion of Technical Systems Consultants BASIC 
and MIcrowarc BAS1C09 programs Into C programs 
begun In an earlier chapter. 

CONVERTING BASIC PROGRAMS TO C 

The OPEN statements perform essentially the same 
functions In TSC BASIC and In BASIC09: however, the 
formats for the statements are dlirerent. All require a 
Ole number, a Ale specifier, and a mode, which are all 
handled differently In the two types of BASIC 
lnterpieters. 

TSC BASIC supports the following formats for 
OPEN statements: 

CPEN OLD filespec AS filanunto 
OPEN NEW fileapec AS filanunb 
OPEN filespec AS filanurrb 

Mode OLD requires the disk file to pre-exist and 
opens It for input. Mode NEW always creates a new Ole. 
deleting any old one by the same name, and opens it for 
output only. The null mode opens an existing file or 
creates a new one. and opens it for random access, bolt 
Input and output. 

BAS1C09 supports the following formats for CPEN 
and CREATE statements: 

OPEN *f ilenumb, filespec [ :options] 

CREATE Ifilenuiris, filespec [:optiona] 

OPEN opens an existing file and CREATE opens a 
new file. The options are as follows: 

READ open file for input only 

WRITE open file for output only 

UPDATE open file for input and output 

EXEC open file with execute permissions 

DIR open directory file 

and they may be combined by separating the 
options with "+" symbols. All BASIC09 disk files are 
accessible in a random mode. 

BAS1C09 requires that file numbers always be 
preceded by a "#" symbol, whereas TSC BASIC requires 
that they be pieceded by a "#" symbol In the INPUT. 
PRINT. GET. and PUT statements, but not in the OPEN 
and CLOSE statements. 



Unless the low-level Input/output processing 
represented by the C functions open, close, read, write, 
etc. is appropriate, the high-level input/output 
processing represented by the C functions fopen. 
fclose. fread, (write, etc. must be used. For these 
functions, file pointers, rather than file descriptors, 
must be used. 

Although the INPUT statements are similar in 
format In TSC BASIC and in BASIC09. there are 
differences. The TSC BASIC INPUT statement 
assumes a comma separator between fields. The 
BAS1C09 READ statement assumes a hex-00 
separator. Both use carriage returns as record 
delimiters. Corresponding to the BASIC09 READ 
statement. Is the BASIC09 WRITE statement, which 
separates fields with hex-00. and may be used as an 
alternative to the PRINT statement, which separates 
fields with spaces. The TSC BASIC INPUT statement 
always stalls with a new record. The BASIC09 READ 
statement starts with the next byte alter the previous 
one processed. The TSC BASIC INPUr UNE statement 
allows direct Input without delimiters. The INPUT 
statements of both languages accept commas as 
delimiters. The BAS1C09 GET statement, which may 
sometimes be used In a similar manner to the TSC 
BASIC INPUT LINE statement, does not honor 
backspaces and other contiol characters. 

There is no direct equivalent in C to the TSC BASIC 
INPUT or INPUr LINE statements or the BAS1C09 
READ and GET statements, on an Individual basis, 
these statements may usually be recoded as fscanl 
functions with appropriate control string, although the 
equivalence is not exact. 

There are several minor differences between the 
TSC BASIC and BASIC09 PR INT statements. One has 
already been discussed, concerning the TSC BASIC use 
of file number zero corresponding (somewhat) to the 
BAS1C09 use of file number one. Another is the lack ol 
a parameter on the BASIC09 POS function. Indicating 
that it may only be used In a PRIVT statement, and only 
to designate the character position in the current 
output buffer. 

A major difference between the TSC BASIC and 
BAS1C09 PRINT statements concerns the 
interpretation of the control string In the PRINT USING 
option. The TSC BASIC PRBVT USING control string 
may contain control sequences similar to the following: 
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! single character string field 

\...\ multiple character string 

field 
*»♦#.♦♦ number field 

$$##♦.#♦ number field with floating 

dollars 
**♦♦♦.*# number field with floating 

asterisks 
I,,, If. It number field with inserted 

commas 
#•*♦.!♦- number field with trailing 

minus 
t .tlttt**** number field with scientific 
notation 
(other) inserted character 



In which repeated symbols designate field width 
and number of decimal places. The BASIC09 PR1N1 
USING control string may may contain control 
sequences similar to the following: 

Bwj boolean format 

Ew . f j exponential format 

Hwj hexadecimal format 

Iwj integer format 

Rw.fj real format 

Swj string format 

Tn tab to column 

Xn insert spaces 

'string' inserted character string 

where "w" represents total Held width, "f" represents 
fractional Held width. "J" represents justification mode 
("<" la left justification, ">" is right justification. " A " Is 
right Justification with trailing sign), and "n" represents 
an Integer value. 

Obviously, there are differences and similarities In 
the PRINT USING Interpretation which must be 
considered when converting BASIC PRINT USING 
control strings to C fprlntf control strings. Since TSC 
BASIC and BASIC09 both support dynamic or static 
construction of the control strings, the changes 
required may be simple or complex, and will not In 
general be exact, since TSC BASIC PRINT USING 
control strings may specify operations (such as dollar 
sign or asterisk Insertion) not supported In C prlntl 
control strings. However, In most cases, the changes 
required to convert the control strings will be 
straightforward, and It will not be necessaty to code ar 
Interpreter to handle the PRINT USING control strings 
directly. 

The TSC BASIC function INCH$(fllenumb) 
generally corresponds to a BASIC09 
GET#fllenumb.char$ sequence. One conversion 
problem with these statements concerns the fact that 
the characteristics of the OS9 device driver may affect 
the value returned and whether or not a character Input 
fiom the keyboard Is echoed to the screen. 

TSC BASIC supports record-oriented random disk 
I/O. whereas BASIC09 supports byte-oriented random 
disk I/O. The logical means of converting from the TSC 
BASIC style of random I/O to the C style of structured 
I/O Is to convert the BASIC records to C data 
structures. Unfortunately, there Is no simple method to 



perform this conversion which will work in all cases. 
The TSC BASIC FJE1JD statements define the record 
formats In a dynamic manner, so that the description ol 
a record may vary as the program proceeds. BASIC09 
supports a complex data structure, but It Is not 
dynamic. 

Given that a C complex data structure can be 
established to describe a record, the C I/O statements 
can be used to perform the record-oriented I/O. The 
problem Is how to convert FIE1X) or record statements 
and operations on FlElX)ed or record variables Into C 
structures and operations on structure elements. 

One manner In which to accomplish this for TSC 
BASIC Is to define one C complex data structure for 
each file as one string of length 252. Then each original 
TSC BASIC FIELDed variable would be represented by 
two C variables, each set at the location of the original 
FIELD statement, providing starting position and 
length of the original FIELDed variables In a dynamic 
manner. A naming convention for these variables 
would relate them to the original FIElJDed variables. 
References to the value of FIELDed variables would be 
made with the C equivalent of the BASIC MIDI$ 
function. However. C does not directly support BASIC 
string operations, so this approach could become 
complicated. 

Another manner In which to define the structures, 
which is applicable only In the case of fixed FIELDS, Is 
as composed of the original FIEIJDed variables, but 
defined as strings with location and length the same as 
In the original record description. Then the FIELDed 
variable assignment statements LSET and RSET are 
much simpler to convert to C. 

The TSC BASIC string conversion functions CVTxx 
do not exist In C and their use must be avoided by 
modification of structure definitions for FIElJDed 
variables or defined as C functions. 

The TSC BASIC concept of virtual arrays Is very 
powerful and Is used by many programs. 
Unfortunately. C has no direct analog for virtual anays. 
considerably complicating their conversion. In reality, 
virtual arrays are a notatlonal convenience for fixed 
length, record oriented random disk access. The 
DlM#ftlenumb statements establishing them may be 
changed to DIM and FIELD statements, and each 
occurrence of their use may be replaced with BASIC 
code to locate and read or locate and write the Indlcatec 
elements. 

In the case of reasonably small virtual arrays, they 
may be changed to string arrays and handled by 
reading the entire file Into memory during Initialization 
and then writing It from memory during wrapup. 
Whichever approach Is chosen, the modifications 
should be made and checked out before conversion, noi 
afterward. 

Error Handling 

TSC BASIC and BASIC09 provide similar 
structures for the Interception and handling of many 
types of errors. Error Interception routines are 
established with the "ON ERROR GOTO label" 
statement, which specifies that control Is to be 
transferred to label "label" if an error occurs. TSC 
BASIC error Interception Is cancelled with the "ON 
ERROR GOTO 10]" statement, and BASIC09 error 
Interception Is cancelled with the "ON ERROR" 
statement (without the "GOTO label"). 
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Both TSC BASIC and BAS1C09 place (he error 
number Into pseudo variable ERR: however, BASIC09 
aeroes ERR after the first reference, but TSC BASIC 
does not zero ERR automatically. TSC BASIC places 
the line number on which the error was detected Into 
peeudo variable ERL. BASIC09 has no such facility. 

TSC BASIC requires that the exit Irom the error 
handling routine be accomplished with the RESUME 
statement, which can designate a specific label to 
which to return (with the "RES ME label" option), or car 
return to the statement at which the original error 
occurred (with the "RESUME" option). BASIC09 does 
not require any particular means of exiting from an 
error handling routine, but provides no direct means ol 
returning to the line on which the statement at which 
the original error occurred . 

Unfortunately, C's error processing Is very different 
from BASIC'S. The error number and error line facilities 
or BASIC have little direct analog In C. If it Is 
supported, the signal function of many of the standard 
C libraries is used to establish Interrupt handlers for 
specified error conditions and the errno variable Is 
used to specify the error number. Thus, the conversion 
of error handling facilities may be quite Involved. 

Functions 

Function calls provide much of the notatlonal 
power of the BASIC language, and both TSC BASIC and 
BAS1C09 support function calls, although In somewhat 
different means and with dllferent restrictions. 

TSC BASIC supports the OEF statement, which 
allows the definition of a short (one-line) function with 
parameters, similar in meaning to the C #deflne macro. 

For an example of the problems of expanding 
expressions to Include OEF functions, consider the 
following TSC BASIC program fragment: 

DEF n»(Xl-U3G(-X)+l 
: 
: 
Y-2*FNMZ-1) 

The direct substitution of the body and parameter ol 
function PNA would produce the following Incorrect 
results: 

Y-2«IOG(-Z-l)+l 

whereas Ihe following statement represents the 
correct conversion of Ihe original statement: 

Y-2"(LOG(-(Z-l))+l) 

so #deflne parameters and bodies should be 
enclosed In parentheses (when necessary) to maintain 
the Inlejplty of Ihe original expressions. 

C requires that the correct type of function be used. 
Usually, Ihts Implies that Ihe type of function agree 
with the type of argument. 

This discussion Is continued In the next chapter. 

EXAMPLE C PROGRAM 

Following Is this month's example C program: It 
outputs a UNIX shell script consisting of chown, chgrp, 
and chmod commands which will correctly establish 
groups, modes, and ownership of all Hies and 
directories included In and below the directory-list, it 
could be readily modified to do the same for OS- 9 or 
UN1FLEX. 
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z 

Q 



SP 



I 

•lsa 
1 



t 



while (f gets (string, 256. dlr)) 

genscrlpt (string) ; 
£ close (dlr); 
unllnk(tenp) ; 



fprlntf (stdarr, 

"Cannot open tenp file %s\n". 



biul; 



t«>p); 



•lsa 

< 



unlink (tenp) ; 



fprlntf (stderr, "Cannot read temp file %s\n", 

tenp) ; 
broak; 



tendlf 



unlink (tenp) ; 
exlt(O); 



genscilpt (string) 
char "string; 



* (p « string ♦ strlen (string) - 1) = 0; 

If (! 'string) 

( 

♦♦bl; 

return; 
) 

If (bl 44 (*— p ■» ':•)) 
< 

bl - *p • 0; 

sprlntf (path. Ms/", string) ; 

return; 
) 

bl • 0; 
switch ('string) 

< 

case '-': 

case 'b' : 

case ' c ' : 

case 'd': 

case '1': 

case 'p': 



) 

■or 



if (p 

( 



strrchr (string. 



•)) 



FOR THOSE 



worktB] - 0; 

prlntf ("chown %s %s%s\n", 

stmcpy (work, string ♦ IS. 6), P*th, ♦♦») ; 
pilntf ("chgzp *s %s%s\n". 

strncpy (work, string •» 24. 8), path, p); 
prlntf ("chacd u—"> ; 
If (strlngllj — 'r'l 

prlntf ("r"); 
If |strlng(2] •* '»■! 

prlntf ("w"); 
If t(strlng[3] — 'x') II <strlng[3l — 's')) 

prlntf Cx"); 
If (strlng[3) = "s') 

prlntf ("s"); 
If (<strlng[9) 4 OxSf) — 'T") 

prlntfCf); 
prlntf C,o=">; 
If (strlngH) — 'r*> 

prlntf ("r"); 
If <strlng[5] — •*•> 

prlntf l*w"); 
If l(string[6] — '«'l II (strlng[6) — 's')) 

prlntf ("x") ; 
If (string[6) — 's'l 

prlntf("s"); 
prlntf (",o-">; 
If (string [7] — 'r') 

prlntf Cr"); 
if (strlnglB) — '*•) 

prlntf ("w"); 
If <(striiig[9] — 'x') || (strlngH) — 'I'M 

prlntf ("x"); 
prlntf I " %s%s\n". path, P); 
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ALTERNATIVES TO THE EDITOR, 
THE WORD PROCESSOR 

dim months bock I did a report on using editors. 
Specifically, I used the OS-9 editor. It contains many of the 
features found In editors. There are other editors out there, 
which will act similarly. In many cases you will probably 
find one that Is more to you liking. Sometimes, the editor 
ts pait of another piece of software. An example of this 
would be BASIC09. It has a number of different modes, 
one of which Is lta own editor. 

There are however other ways to get you text Into a file. 
Namely there Is the woid processor. Some may feel that 
the word proceBso r Is another editor. I like to think of them 
as separate, but pait of the same family. If you look at the 
evolution of software, they are both part of the same 
branch, but have split Into two sepaiate families. ( In many 
cases, a blend of the two may exist. But we will consider 
them sepaiate entitles. ) 

One major difference between the two Is how data ts 
entered. The editor Is line oriented. Information Is entered 
on a llne-by-Ilne basis. Some editors can split and merge 
Una easily, but basically entering a line Is the how It 
works. In fact, some of the early editors were line number 
oilented. I originally started on one like that, later when It 
came time to switch to one without line numbers , I thought 
I would never be able to make the transition. Now I don't 
think I could use one wllh numbers again. 

The word processor Is screen oriented. Basically, you move 
around the screen and put text where the cursor lands. If 
you move too close to the light hand margin. It wraps 
around to the next line carrying the last woid with It. 
Some specialty keys have been added to move the cursor 
around or move the screen. As text Is typed, the cursor 
moves along with everything In front of It moving along 
also. There may be an overatrtke mode. Here the entered 
text writes over the old. But the textq entry Is always 
oriented from the screen. 

Because of the screen orientation, there Is a great reliance 
on the terminal's screen control characters. The usual 
ones are backspace, home cursor, clear screen, and clear to 
end -of line Some terminals allow moving the cursor using 
x and y coordinates. The entile Idea ts to give the illusion 
of mobility on the screen. Usually when a word processor 
Is acquired. It must be configured for the particular 
terminal It Is used on. In contrast, the editor moves unldl- 
recuonally and usually works on any terminal without any 
previous adjustments. 

Word processors provide specialty keys. This may be on a 
key pad. They could be the standard keys, but used 



differently. For example, holding down the CTRL key may 
cause the keys to have new functions. Many of the new 
systems are ICON operated. ( More about It later. ) No 
matter how It Is done the net result Is the game. 

Rather then talk about hypothetical woid processors. It Is 
best to look at a real one. I use mostly STYLOGRAPH by 
Stylo Computer. They make the word processor for both 
OS-9 Level I and II, as well as, OS-9 on the 68K system. An 
Interesting feature of Stylo Is that it dynamically updates 
the screen as It Is used. The screen appeals as It will be 
printed. This Includes all the pagination. Many word 
processors add this as a final step belbre printing. Many 
times they are a separate program. For our discussion we 
will focus mainly the text entry capabilities. 

There four modes to Stylo. They are Insert mode, supervi- 
sor mode, overwrite mode, and editor mode. The supervi- 
sor mode Is the main menu, providing for things like 
loading files, saving files and pilntlng to the printer. Over- 
write mode allows typing over text that was previously 
entered. This can be useful. However, well consider the 
two remaining modes In more detail. 

For entering text, there Is the Insert mode. This one adds 
text to the current location. Text after the cursor location 
Is moved ahead. In this mode the CTRL key must be used 
to access any special features. The following are available 
when used with the CTRL key. 



w 


Delete word 


D 


Delete letter 


R 


Set Tab 


T 


Tab 


U 


Underline 


o 


Overllne 


p 


Page Status 


A 


Assistance 


F 


Format Display 


O 


Ghost Hyphen 


K 


Subscript 


X 


Delete Line 


V 


View Mods 


B 


Bold face 


N 


Name Error 


y 


Superscript 



I won't go Into great details on these, except to highlight a 
few of them. Notice that lines, woids and characters can 
be easily deleted. There axe also many text formatting 
features included like underline and subscilpt. Name error 
repoits the last error. Assistance displays help screens of 
Information. 
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requites an input at some command line. With the word 
processor, It is a simple key stioke. The editor has little In 
the way or text formatting. Usually help comes from 
reading the manual and not online, as it is here. 

Stylo has what It calls the "Editor Mode". This mode 
permits text, screen and cursor manipulations. Among its 
features ans 

1 Co to Overwrite mode 

7 Scroll screen left 

9 Scroll screen right 

S Save a part of text 

W Withdraw the text from the buffer 

D Duplicate the buffer 

F Find a target string 

Y Move cursor a woid left 

U Move up a line 

Move up a screen 

P Move to a new page 
( MOve a woid right 
J Move cursor left 
K Move cursor to either margin 
L Move cursor right 
M Move down a line 
Move down a screen 

These give an Idea of what can be done while in the editor 
mode. Notice that most of them are screen oilcntcd 
maneuvers. The feeling is that you're moving around a 
page, rather then fioni line to line. 

This has been a whirlwind tour of word processors and 
Stylo. Stylo comes with a vary thick manual and has much 
more than I have told here. There are many things about It 
and word processors. In general, that could not be coveted 
In the space of one column. 

Another thing. I have drawn a sharp distinction between 
the editor and word processor. The world of text processors 
is not black and white. There are many that come some- 
where betwezn the two extremes. Many text processors 
consider themselves to hybrids, combining the best of both 
worlds. If you use have used editors and word processors, 
you have probably made your mind up which you prefer. I 
find most people prefer a screen oriented environment. 
Then: arc many fine word processors and screen oriented 
editors available. 

THE FUTURE OF THE WP AND EDITOR 

As I pointed out earlier. ICON driven test processors are 
available. Many of the computer systems that have graphic 
capabilities use ICONs. The usual way of doing things is to 
move a mouse. Joy stick or track ball, positioning an arrow 
over a picture that describes what is to be accomplished. If 
more Information Is needed, another menu appears, 
requiring further response. The Idea Is to provide an 
environment that requires little knowledge. The system 
lakes you by the hand and leads you to where you want to 

&■ 

1 know one person that has a system that Is capable of 
accepting command lines or ICONs. He prefers using 
command lines. Another friend uses the ICONs and 
wouldn't have any other way. He says, he doesn't have 
time to learn things from a long manual. Personally, I like 
to use commands lines. However, using the ICONs Is a re- 
freshing change and can be fun. 



oriented editor. This Is something like the built in editor of 
BASICOS. The difference Is that the editor can be biased 
toward a particular language. I have one at work that I 
use. It Interprets the file name and ortents Itself accord- 
ingly. If the program name ends In .C. It knows I am 
writing a C program. If It ends In .BAS. I am writing 
BASIC. It also understands FORTRAN and PASCAL. 

Ihe editor generates programming templets. These are 
outlines of how to program in the particular language. Let 
us say your are using this editor. It prints a line like: 

<s tale men t>; 

The cursor Is positioned over the above. The Expand 
Templet key Is pressed and a menu appears giving possible 
choices. So. we select the WHILE construction from It. The 
above line expands to: 

while I <cxprcsslon> ) 
-^statement*; 

Now we further continue this growth process and expand 
the Templet more. Eventually, customized inputs must be 
used. But this type of activity can help someone get 
started writing programs. 

Another advantage of the language oriented editor Is that It 
contains help for using the language. Again In our 
previous example, what If we did not know what WHILE 
did. With this type of editor, we would move the cursor 
over the word In question and type the Language Help key. 
Instantly a description of how to use the particular word 
would appear. 

Another Item that is handy to have while editing text Is an 
online dictionary. I have seen one word processor that had 
this feature. Unfortunately. It was not wiitten for OS-9. To 
use this, one moved the cursor over the word, spelled It as 
close as Is possible. A Look Up key was pressed and the 
word processor compared the word to words In the diction- 
ary. Close matches were displayed. The user could then 
select the correct spelling. ( Hopefully, It was found! ) 

These arc some thoughts of my mine about what I would 
like to see In a word processor or editor. There is so much 
(hat can be done. I have only touched on a few Ideas. I am 
sure there many more out there. It only takes an Idea and 
someone willing to make It work. 

GETTING OPTIONS 

I got a letter from a reader recently who ran Into an 
Interesting problem. He had copied a program from the 
column and found that It crashed his system. The line he 
reports that did It is: 



while ( -argoO && {•-argv}[0)« 
<statement> ; 



') 



One item that I have not 



In OS-9 Is a language 



The problem, he reports. Is the second expression Is 
checked, even If the argc equals 0. Now, Krmlghan and 
Ritchie In The C Programming Language tell, this line 
should be evaluated leit-to-right. If an expression Is 
FALSE, no more evaluations occur and the following 
statement Is not executed. We could argue the point. In- 
stead a better method to parse the input line could be 
found. 

I present here my version of getoptfj. It has sunuarttJcs to 
the one described by Dr. 'Bud' Pass In his may column. I 
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To accomplish many or these operations with an editor 
also took a look at ones that are available with some or the 
newer C compilers. And I added my own Ideas. If you like 
this one add It to your C library. Add Improvements If you 
like. Aa time foes on. I will probably use It my C programs. 

1 plan on explaining how to use getoptfj. I will let the 
workings or It to you. 1 think once you understand what It 
does, how It works will be clear. Here's the classical 
manual type description. 

extern char -oplarg; /• Option argument •/ 
extern lnt optn; /* Next option */ 
extern optern /• Error status •/ 

char 'getopU c. v. optllst ) 

lnt c: /• argument count */ 
char **v: /• argument vector •/ 
char 'optllst; /• option list •/ 

Getoptfj returns a pointer to the next option. When NULL 
la returned . no more options are available. An option must 
be preceded by '•'. Encountering anything else signals the 
end of options. The pointer letumed Is the option In the 
parame ter list. There may be other characters following It. 
C Is usually the argument count. V Is the argument vector. 

On entry optn should point to the first option, usually 1. 
After each call optn will be incremented, pointing to the 
next option. 

Optllst la the option list. It contains the expected option 
characters. If an option character is followed by a '»'. an 
argument is sought. The option's argument can Immedi- 
ately follow the option or be separated by a space. An 
equal sign can also be used for Improved readability. 

Successful calls to getoptfj will return with opteir equal to 
0. Should an error occur, a negative number will be 
returned. A - 1 Is Illegal Option. This Is one not found In 
oplllst. A -2 is Missing Option Argument. This occurs 
when an option argument Is expected and the end of Ihe 
Input line la encountered. A -3 is Argument Not expected . 
This happens when It appears that an option argument has 
been passed, but none was expected . 

So now you are ready to use getoptfj. Right? Well let me 
show you how to use It. Listing 2 is lltlle progiam that will 
help demonstiate gctoptfl's uses. First, create the listing 
shown In Listing 1. Male certain that It Is tn the working 
dlrectoiy. Next, create the program In Listing 2. Call It 
optest.c. Now. compile It) The line: 

■Include "getopt.c* 

will cause the compiler to load It. This Is a simple way to 
Include outside progiam pails. 

We are now ready to tiy It. Notice that a, b. c and d have 
been defined as options. The ■ following c and d mean that 
they expect some type of argument. So we are ready lo go. 
Tiy this line. 

optest -a -c hello d=bye -f -c 

You should see the following on the screen. 

opt=a optarga opterr»0 optn»2 
opt»c optarg'hello opterraO optn«4 
optad optargabye opterraO optnaS 
optaf optarga opterra-1 optria6 
optac optarga opterr=-2 optna7 



Here a la a legitimate option and returned fiiat. Next Is c. 
It la not followed directly by an argument, but one la 
expected. So "hello" Is picked up. D comes along with Its 
argument "bye*. F" is not a legal option, so Its returned 
with a error. -I. C comes last, but this time thae are no 
arguments where one was expected . So an error, -2, la 
returned. Optn la pointing to the next line argume nt. Thla 
can easily be accessed by Its pointer. argv|optn|. 

Eventually, you will want to make It part of your personal 
library of C routines. You will want to create a object file, 
using: 

cc 1 -r getopt.c 

Ihls will create an object file, called getopt.r. Next you will 
want t put It Into your llbnuy. 



copy getopt.r /dl /LIBRARY/ getopt 

And now we are ready to use. One thing remains. Some 
variables muat be declared as external These are done for 
you In Listing 3. You'll want to put them In another file. 
Call it getopt.h. When you write programs using getoptfj 
add to the beginning of your sourer code: 

'Include "getopt.h" 

When you are ready to compile use a line like: 

ecl flle.c -l./dO/UBRARY/ getopt 

This will Instruct the C compiler to link to the object 
module In /dO/UBRARY (providing It Is on DO). 

liy out getoptfj and let me know what you tlilnk. Make im- 
provements, If you want. If you come up with something 
worth sharing, drop me a line. Well put It In the column. 

Until next lime have funl 



LISIING ONE 
1 /* ••••' 
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Name: GETOPT 
By: Ron Vaigts 
Date: 2S-MAY-B7 



Function: 

This function examines the argument list 
returning a pointer to the option and 
its argument. A null string is pointed 
to if the option has now argument. 



Version 1.00 
Original. 



•define TRUE 1 
•define FALSE 

char 'optarg; /• Option argument •/ 
lnt optn; /* Next option */ 

lnt opterr; /* Error status •/ 
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29 char *getopt I c, v, optllst ) 

30 lnt c; /• argument count •/ 

31 char "v; /• argument vector •/ 

32 char *optllst; /• option list •/ 
33 

34 ( 

35 int isoption; /* option flag •/ 

36 lnt hasarg; /• option argument flag •/ 

37 register int 1; /• useful Index */ 

38 char *opt; /■ option pointer •/ 

39 char *t; /• argument pointer */ 

40 static char •null-'\G"; /* null string */ 
41 

42 /• Set up the null string for 'optarg' */ 

43 optarg - null; 
44 

45 /* Set up the error return status */ 

46 opterr - 0; /• No errors •/ 
41 

48 /* Set up the argument */ 

49 t»v(optn],- 
50 

51 /* We are at the end of the argument list */ 

52 If ( (optn— c) || («t!-'-'l || ( «t=.'-' a 
Mt+1>— '\0' ) ) 

53 return! ); 
54 

55 /* He can set the option •/ 

56 opt - t+1; 
57 

58 /* Check if we have an option with an argument 
•/ 

59 isoption - FALSE ; 

60 hasarg - FALSE; 

61 for ( i-0; i<strlen(optllst) ; 1++ ) 

62 if < 

toupper (*lt+l) )>>toupper(optlist ID) ) { 

63 isoption » TRUE; 

64 if ( optlistiml— '-') 

65 hasarg - TRUE; 

66 } 
6? 

68 /' If this is not an option then return with 
error */ 

69 if < I Isoption ) 

70 opterr--l; /• illegal option •/ 
71 

72 /* Now we check and set up the argument */ 

73 if ( hasarg ) { 



74 


If (Mt+2) — »\0') 


75 


if ( optn < c-1 ) 


76 


optarg - v[++optn]; 


77 


else 


78 


opterc"-2; /• Kissing option argu 


ment •/ 




79 


else 


80 


optarg - t+2; 


81 


if ( "optarg I 


82 


optarg++; 


83 


) else 


84 


if ( '(t+2) !- -NO' ) 



85 opterr»-3; /• Argument not expected 

•/ 
86 

87 /' Now we have an argument and option */ 

88 optn**; /■ Adjust the next pointer •/ 

89 return! opt 1; /• Return the option pointer 
•/ 

90 

91 ) 
92 

LI ST INC TWO 

! /. ........................... 

2 

3 Name: OPTBST 

4 By: Ron Volgts 

5 Date: 7-0UN-87 
6 

7 •••• •• 

a 

9 Function: 

10 This little routine can be used 

11 to test the function getoptl). 
12 

13 

14 

15 Version 1.00 

16 Original. 
17 

18 ./ 

19 

20 

21 I include "getopt.c" 

22 

23 main< argc, argv ) 

24 int argc; 

25 char "argv; 

26 { 

27 char "opt; 

28 char •llst-'abc-d-"; 
29 

30 /• Set this to 1 •/ 

31 optn-1; 
32 

33 /• Now we'll scan the input line •/ 

34 while I (opt-getopt (argc, argv, list )) !- 
) ( 

35 print fC"opt-*c *, *opt ); 

36 print f foptarg^tjs *, optarg ); 

37 prlntf C*opterr-*d *. opterr ); 

38 print fC*optn-»d \n*, optn I; 

39 1 
40 

41 ) 
42 
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SOFTWARE 



A Tutorial Series 

By: Ronald W. Anderson 
3540 Sturbridgc Court 
Ann Arbor. MI 48105 



USER 



From Basic Assembler to HLL's 



Son of Mustang 

A few weeks ago the company's single board 
computer, the Peripheral Technology board with the 
68008 anived. followed shortly by OS-9 and SK'DOS. 
We fired the system up with a couple of 80 track 
ditves and were able to run both operating systems 
Immediately. A few days later I decided to get a hard 
disk attached to the system since we had a spate and 
a WD 1002-05 controller that we had bought used 
recently. The 20 Mbyte unit was not exactly the same 
as the configuration (device descriptor) Die In the OS- 
9. so we set oil to tiy It out first with SK*DOS, just to 
tty to keep things simple. First problem was that PT 
uses the second drive select from the WD. as drive 
and the third as drive 1. Once we understood that 
(thanks to a call to Peter Stark), we got the hard disk 
formatted and copied all of the SK'DOS files over to it. 
The SK'DOS HDFORMAT utility prompts for the 
number of cylinders, heads, sectors per track, etc.. so 
It will handle any hard disk drive provided you know 
what the parameters are. All the hard disk drive 
manuals we have, contain all the necessary 
Information. 

Our next step was to tiy to format about 1 /3 of 
the disk under SK'DOS and the remainder for OS-9. 
After a day's worth of fooling around with files linked 
to files linked to other files In OS-9 and some 
experimenting because the meaning of the 
parameters was abundantly unclear, we managed to 
get the remainder of the disk formatted under OS-9. 
and then to get the boot properly Installed so we can 
now boot either SK'DOS or OS-9 on the system. I 
Installed PAT/68000 (OS-9 Version) and we were 
Immediately able to run it and edit text files. We 
loaded my preliminary copy of PLuS from Windrush 
and It ran llrst tiy. 

I am working on a PLuS vei-slon of PAT since I 
decided It would be easter to link to SK'DOS than the 
"C" version. I hope to get PAT running under SK'DOS, 
though It will probably be a few months before that 
spare time effort is completed and debugged. 
Meanwhile Pete sent me an assembler (thanks to Bud 
Pass), a TINY "C" compiler, (mlnlscule would be a 
better word), and a screen editor written tn "C" to use 
to get other things moved tnto SK'DOS. I thought I 
would try to get JUST running in the tiny "C". but I 
soon found that it didn't allow pointers, didn't suppott 
the logical operators I (not). &&, and I I . Of course tt 
didn't understand what a static variable declaration 



NOTES 



meant, and didn't support Initializers either. Then I 
found that FOR NEXT loops are not Implemented. I'd 
have to rewrite half of the program. I decided to wait 
for the nearly full "C compiler that is In the mill. 

Having struck out on doing much more with 
software for the moment. I decided that we would take 
this rather nicely running system and put It In a box. 
We had ordered an IBM Clone box with an IBM clone 
power supply In It. and about that time the box 
arrived, so we put the processor and hard disk 
controller In a stack with long spacers between, and 
then Installed the power supply, an 80 track floppy 
drive and the 20 Mbyte hard disk drive. The system 
would run seemingly for an hour or so and then It 
would bomb. We figured we had a heat problem and 
added a small fan blowing directly on the processor 
and disk Interface card. Things got better, but still 
eveiy hour or so the system would bomb with a 
ridiculous error message, indicative of the memoiy 
having lost or modified data. We separated the 
processor and disk Interface boards further with 
longer spacers with little change in the problem. I 
added a shield (aluminum foil In an envelope, 
grounded with a clip lead) between the boards and 
thought things were a little better, but the problem 
still occurred. We substituted Ihe power supply that 
we had been using when Ihe system was scatteied all 
over the bench, and still no change. Finally In 
desperation, I unfastened the processor board, which 
was on top of the contioller. and moved It a few Inches 
away. The problem went away, at least for the 
remainder of the day. and since It had not gone that 
long previously without failure. I assume that the 
problem was In the proximity of the two boards. We 
will mount the processor well away from the disk 
controller, and things should be fine. "See Editor's 
Note, end of this article. 

Hard DUk Woes 

We have been using hard disk drives for about 
three years now. and we had a 20 Mbyte drive that ran 
just fine for a year or so and then suddenly quit 
writing. It would read fine, boot, etc. but any attempt 
to do an operation that required writing to It lesulted 
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In Instant error messages. The problem would leave 
as quickly as it had come, and It has been an 
Intermittent problem for some time. Not too long ago 
It quit and seemed determined to stay In that mode. 
We explored having It repaired, but I was discouraged 
by prospects of paying about the cost of a new unit for 
a repair. 1 decided one day that the problem had to be 
an Intermittent connection since when It worked It 
worked fine. The Tact that It "fixed Itself' ruled out the 
failure of an Integrated circuit (at least a bum out 
failure). I decided that I would work on what I could 
work on without opening the sealed portion of the 
drive, so 1 carefully went over the PC board, soldering 
all the connections. I didn't find any obvious cold 
solder joints, but when we hooked the drive up to the 
new 68008 computer. It worked Instantly and has 
been running for days with no problems. Perhaps I 
have fixed It. 

How to Wipe Out a Hard Disk Drive Instantly 

This Is being written about a week after the 
above. That 20 Mbyte disk Is still working perfectly. 1 
think the problem has been cured permanently. 
However... as the old saying goes, "you win some, you 
lose some". We had three hard disk drives, all used, 
that had been sitting around our work area for some 
time, that we had never gotten around to connecting 
to any computer. Two are old Segate 506 units and 
one ol them has a "dead" tag attached to It. Given the 
ease of telling SK'DOS the disk parameters. I thought 
1 would check them out. The dead one really was. It 
didn't do anything... Maybe It Is repairable with a little 
llddllng. The second seemed to work. It formatted 
perfectly, but when I tried copying files to It. It 
Indicated a bad sector on track 0. and once the 
dlrectoiy got to that sector 1 got a DRIVE NOT 
READY 1 error when 1 trted to access It. I will see later 
If 1 can figure out how to trick It Into working. 

So far. nothing lost...l said I'd pay for the dilves If 
they were usable. Then I dug out a newer 10 Mbyte 
dilve and proceeded to connect the power with the +5 
and -1-12 volt supplies reversed. 1 figured I had literally 
blown It as soon as I discovered my error. I made the 
coirectlon and tried It out anyway. It accelerates to 
speed and goes through Its self test mode, so things 
couldn't be extremely bad. but It doesn't talk to the 
Interface. At least I am a little ahead, since I have 
repaired a 20 megabyte drive and destroyed a 10. 
Later the same day. 1 turned off a development system 
after carefully removing the disks Irom the 8" floppy 
drives, but I forgot a disk In one of the 5" drives and 
managed to clobber a sector right In the middle of an 
Important program source file. Fortunately there was 
a recent backup, and later I managed to recover the 
Hie and fix the two corrupted characters, but 1 
certainly didn't feel very good about my day. 

More OS-9 

A few months ago 1 expressed some displeasure 
with the OS-9 manual, particularly as a beginning 
user of OS-9. 1 mentioned that the manual begins very 
early to talk about RBF devices and SCF devices, but 
never defines either. Well. 1 don't think 1 lied, but deep 
down in the OS-9 Technical Manual are two sections 
describing files, titled "Random Block Files" and 
"Sequential Character Files". I assume that the 
abbreviations RBF and SCF are for those, though 
they are not used In the sections with those titles. 



The other day as I was starting to translate PAT 
FLEX 6809 PL/9 version to PAT PLuS 68000 OS-9 
version. 1 decided to get Into the file handling early on. 
since It would be the major difference between the 
FLEX and the OS-9 version. I found that between the 
OS-9 Programmer's Manual and the PLuS manual, I 
was able to figure out how to get filenames from the 
command line In only a couple of hours and a dozen 
tries at a test program. It only took another 8 or 9 
tries to figure out how to detect the End of Ftle error 
message and use It to terminate reading of an open 
text file. Golly, only 3/4 of a day and 1 can now write a 
PLuS program to copy a file under OS-9! I'll keep you 
all posted on progress In the 66XXX area. It Is 
beginning to feel like It did In the early days of the 
6800 and 6809. 

Speaking of OS-9 and Its documentation. 1 must 
describe my adventure game trying to learn 
something about it. Mlcroware "C" Is a pretty standard 
"C" compiler, and as such. It pretty well hides the 
operating system from the user with regard to file 
handling. PLuS. however, like PL9 uses the operating 
system rather directly, and simply assists the user In 
accessing the OS. The other day, 1 started working on 
the PAT translation to PLuS. and was busily digging 
Into the file handling to see which procedures In 
files. lib would match those In the FLEXLIB of PL9. I 
thought I was stuck for a while when 1 came upon the 
necessity for a "procedure rename" to allow me to 
rename a file (add a .bait extension or change the 
existing one to that). The PLuS os9.Hb has a 
procedure called f_fork. and 1 saw that It was 
designed to do the OS-9 F$Fork system call, 
supplying at least some of the parameters 
automatically and stulllng the user supplied ones 
Into the appropriate 68000 registers. U\ '{fortunately , 
the folks at Windrush Jell into the trap oj being only 
as descrtpttve as the OS-9 technical manual l«t me 
quote fix>m their manual. 

"asmproc 
f_fork(Iong. long. long, long.lnteger, Integer): 

Create a new process using the OS 9 F$Fork 
system call. The 

parameters are (In order): 



A pointer to the module name 

A pointer to any parameters for the 



LONG 
LONG 
module 

LONG The parameter size 
LONG The additional memory required 
INTEGER The no. of I/O paths to copy 
1NIEGER The process priority 

Well, maybe I'm dumb but about the only things 
more or less clear to me In the above are Ihe first two 
Items. 1 decided that perhaps the first long, had to be 
a pointer to a text string containing the module name, 
and I wanted to call the rename function. Since 
Including a string as a parameter In PLuS passes a 
pointer to that string, and it Is terminated with a null 
automatically. I was on my way. 

f .forkC'rename". 

The second parameter. I reasoned further 
probably was a pointer to a string containing the 
necessary parameters for the rename call. In this 
case an old filename and a new filename separated by 
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a space. Since 1 was writing a test program. I wrote 
code to get the filenames from the command line (see 
the other adventure story above) and assemble them 
into a string with a space between them In an array of 
characters called buffer. In PLuS. a "dot" before a 
variable name makes It a pointer to that vartable. 

f _fork("rename". .buffer 

The next Item to be passed Is "the parameter 
size". How big Is a parameter? If 1 had been correct 
about pointers to strings, this probably means the 
string length. I "Included" strsubs lib. and used strcat 
to put the filenames together, and strlen to return a 
value for the string length, and put It in a variable 
called length. (Later I found I had to add 1 to the value 
obtained by strlen or my rename was short the last 
character of the new filename). 

f fork("rename..bufler.length 

The last LONG parameter Is The additional 
memory required". 1 looked at that and asked myself 
"for what?" Are we talking about the module size? A dlr 
-x -e rename got me a module size of 3236 bytes. 
Maybe they are also talking about stack space for the 
module's execution. How would I know that. Must be 
the module code byte count. 

f.fork("rename"..buHer,length.3300 

Now here's a nice description of what is wanted 
for the next parameter. 'The no. of I/O paths to copy". 
1 suppose If I were calling a program to print a file to 
a printer, and 1 had the printer path open In my 
program. 1 would use 4 (stdln. stdout. stderr, and 
printer). In the present case I was only using the 
terminal, and I would expect error messages on the 
terminal. 1 decided to try 3 and see what happened. 

f_fork("rename"..buQer.length.3300.3 

All that Is left Is the priority. Since It Is an 
Integer. It can't be greater than 32767. but maybe OS- 
9 has some much smaller priority limit. I looked up 
"priority" In the Index and found a section on process 
priority. "Each process is given an Initial priority that 
is specified In the password file. This priority Is set by 
the system manager." The next paragraph continues 
"If you have a program that you want the system to 
give higher priority, the " A " modifier Is used. By 
specifying a higher priority, a process will be placed 
higher In the execution queue. For example: $ format 
/dl *2SS\ 

Well, now 1 know that priorities may be as high 
as 255. but what are the maximum and minimum 
priorities? A check in the Index of the technical 
manual found me a section that Indicates that the 
lowest priority process that will be executed may be 
set by the system "super user" In a vartable called 
D_MlnPty. and goes on to say that that variable 
usually contains the value 0. Since I haven't fiddled 
with It. 1 can assume that any priority greater than 
zero will get my code executed sometime, but there is 
no mention whatever of a maximum priority. Since 
the variable type of the required parameter Is an 
Integer. I suppose 32767 would have to be an outer 
limit on the possible range of values. I decided to try 
128. All that might have been academic anyway, since 
the next procedure discussed In the PLuS manual Is 



f.walt. The text says "Walt for a child process to 
terminate, using the OS-9 F$Walt system call. I 
assumed that meant that the rename process would 
run completely before returning to my test program if 
I Included that call, so 1 did so. Then I wrote a quick 
test program to rename a file, using my previously 
worked out getjllename procedure to get the names 
of the llles from the command line, lire program 
worked on the first try. except that the new name was 
missing Its last character. I added 1 to strlen to 
obtain a value for length In the call, and all was One. 

f_fork("rename"..buffer.length.3300.3.128); 
l_walt; 

In all fairness, the OS-9 technical manual page 
describing the system call F$Fork does shed a little 
more light on the required parameters. Indicating at 
least that the module name pointer Is to point at a 
string. It does clarify the "additional memory" 
parameter as being memory over and above the 
module size and workspace. I found by further test 
that works as well as 3300 for the additional 
memory value In my test program. 

After a year of doing thtngs on and olf wtth OS-9. 
my observation simply is that the manual always tells 
the user what he can do. but almost always doesn't 
give complete Information on how to do tt. The writer 
of the OS-9 manual made too many assumptions 
about the user's familiarity with OS-9. probably 
because he was too familiar with It. After five years of 
talking about SCF's and RBF's. how could anyone not 
know what those abbreviations mean? Wake up. you 
folks at Mlcroware! You've been talking about RBF's 
and SCF's and F$Forks and E$NEMod for so long 
these mnemonics are all part of your standard 
English vocabulary. To someone who hasn't seen OS- 
9 before. It's all Creek (or maybe 1 should say Vulcan)) 
In the case of trying to figure out the maximum 
priority that Is allowed, not only did the primary 
reference to priority In the manual not yield the 
Information, a look at ALL the references to priority 
didn't spell It out either. Your OS-9 manual might be a 
dandy reference guide for the folks at Mlcroware who 
wrote It, but a user guide It Is NOT. 

/ hasten to add that OS-9 ts a jlne operating 
system, and I will be using Ufor a long time to come. 1 
expect 1 will learn a great deal more about It In the 
process. OS-9 has a large number of very nice 
features for an operating system with such a small 
kernel. The code size of OS-9 Is mlnlscule compared 
to UNIX, for example. My only quarrel Is with the 
supplied documentation. 

My next project Is to begin to learn 68000 
assembler code. Now that 1 have SK'DOS so 1 don't 
first have to learn the Intricacies of OS-9. maybe I 
have a chance. After getting a little experience with 
assembler code. I will be brave enough to tackle 
writing code to run under OS-9. As I make dumb 
mistakes. I'll pass along my experiences. 

Update on PLuS 

Last time. 1 did a little review on PLuS Indicating 
that 1 had been debugging a preliminary version for 
Craham Trott and the folks at Wlndrush shouldn't 
say debugging, realty, since what I was doing was only 
uncovering and reporting bugs). 1 now have version 3 
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In my hands. It crossed my last bug report In the mail, 
I'm suie. so It still has the last trivia) bugs that 1 had 
reported last time. 1 expect that these will be repaired 
very soon, but even without their repair. PLuS Is now a 
complete and pretty well debugged compiler. 1 have a 
large backlog of software In PL9 that now can be 
ported to the 68000 systems with Utile effort. Of 
course It Is easier to write the simpler utilities from 
scratch again than to move them from another 
system. Don's treatment of last month's review has 
icmlnded me that many of you readers may be new to 
computing, and that 1 shouldn't make any 
assumptions that you all have been following this 
column for the past 5 years, so 1 really ought to do a 
full review of both PLuS and OmegaSoft Pascal 
starting light from ground zero. 

A Fix for JUST 

Last week my friend and contributor to '68' Micro 
Journal, Dr. Albert McDanle) phoned me to tell me 
about a gieal baigaln he had Just found on a couple of 
used terminals. While we were talking he mentioned 
that he had found out how to cause a peculiar bug In 
JUST to occur. We had noted for some time that 
occasionally for no known reason. JUST would decide 
that the line length should be 1 . and It would suddenly 
put one character on a line when outputtlng text. 
Albert had been telling me about having the problem 
for a long time, but 1 wasn't bothered by it. and hadn't 
ever gotten Into getting It to happen so 1 could llnd 
the reason. Albert said that It had something to do 
with the number of backslash commands embedded 
In the iile. That rang a bell concerning the variable 
SPECIAL In JUST. Special contains a count of the 
control characters embedded In each line of text, so 
that if and when that line Is Justified, a correction can 
be made for the extra characters that will not print. 
Well. JUST handled the embedded printer control fine 
in paragraphs that were formatted or Justified, since 
the procedure flx_end reset lhe count to zero for the 
next line, or rather to the number of control 
characters remaining In the unprlnted tall of the last 
line, which Is moved to the beginning of the llnebuffer 
for the next line. 

The problem was in the printing with no 
Justification or fill. Special was NOT reset under those 
conditions, which for a while was perfectly OK since It 
Is not used If paragraphs are not tilled, but eventually 
Special, which was a byte variable, overflowed, and 
became -128. Since Special Is added to the line length 
In several places In the program, the elfect was to 
make line length negative. Now outputtlng characters 
until CUR_ LENGTH > LIN_LEN. resulted In one 
character per line. The cure Is simple if you have the 
PL9 version and have PL9. or if you have the OS-9 "C 
veision and have the "C" compiler. Down near the end 
of procedure main Is the code In listing A. Note the 
two starred comment lines containing the statement 
"SPECIAL - 0:". Just add this statement at that point 
in the program and recompile, and the bug Is cured, 
and thanks Albeit, for finding that one for me. lhe 
listing Is from the PL/9 6809 code version, but the "C" 
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version Is almost line for line with this copy, except 
that mainO In the "C version Is not at lhe bottom of 
the program, but Just after all the variable and 
constant declarations. 

Editor's Note: The Mustang-OStA uses the same CPU 
card, only we have already worked out all the problems 
encountered in assembling a complete system. However, if 
any of you are having problems getting the board up and 
running using your own parts, the support from us or your 
supplier should be able to help you gel things running o.k. 
Even if you bought it from someone else, we will offer what 
help we can to assist you in getting things right. After all. 
that is what it is really all about, helping each other. 

See Mustang-08/A ad, page 7 for additional information. Or 
if you don't want to fight the hassle, then consider the 
Mustang-08/A. then figure what you will pay just for the 
parts alone! Pretty good deal! 

DMW 

/* MAIN PROGRAM LOOP */ 

WHILE NOT(EOF(.INFIIE)> 
BEGIN 

IF CH - ', .AND FIRST_LINE 
THEN DO_CC**ftND 
ELSE FIRST_LINE - FALSE; 
GETALINE; 

IF OONSEC > 1 .AND FIIX THEN 
BEGIN 

FILL - FALSE; 

PUTALINE; /• DUMP BUFFER */ 
BIANKLINE(l); /• FOR SECOND CR */ 
END 

IF CUR_LENGTH <> LIN_LEN - INDENT + 
SPECIAL 

.AND NOT (EOF (. INFIIE)) 
THEN BEGIN 

CUR_LENGTH - CUR_LENGTH + 1; 
LINE(CUR_LENGTH>~- CH; 
CH - READ (.INFILE); 
END; 
IF CH - ', .AND ENDLIN THEN DO_QQMMAND ; 
IF CUR_IENGTH - LIN_LEN - INDENT + 
SPECIAL .AND FILL 

THEN BEGIN 

SPACECOUNT ; 
PUTALINE; 
FIX_END; 
END; 
IF NOT (FILL) .AND CUR_LENGTH <X) 
THEN BEGIN 

PUTALINE ; 
/A*****************************/ 

SPECIAL-0; 

•A**************************** 

CUR_LENGTH - 0; 
END; 
END; 

EOF 
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A Tutorial Series 
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COMMAND LINE ARGUMENTS 

FORTH thrives on arguments passed In the command 
line, provided that the arguments arc entered before the 
command woid. Veiy nearly all of the common FORTH 
utilities require one or more parameters on the Data Sta k 

Srtor to execution. This has been carried over Into evejy- 
ay FORTH programming pra tJ . such that a FORTH 
command line often looks as ciyptic as a C command line: 
the main difference being the older In whl h the various 
elements arc listed. 

This practice maybe acceptable for most people, but I 
Qnd It intolerable! The reason Is that I easily forget the 
order and quantity of required parameters for those 
utilities which t don't often use. This means that I must dig 
out the documentation from some usually In onvenlent 
location (Murphy's Law In action) and search through it for 
the information I need. Either that, or I make an estimate of 
the correct o der and quantity and go ahead with the 
command. Can you guess whl h one I do most of the time? 

Well I have decided to do something about It at last. Any 
new FORTH programs that I write will allow command line 
parameters, If that is appropriate, but there will also be 
Included the necessaiy error checklne and prompting, In 
ase I don't remember all of the stuff a program needs. 
Eventually, I will get around to addtng this same protection 
to my existing utilities and programs, as the mood strikes 
me. This will probably be Just after I have made some 
terrible blunderl 

A nice thing about FORTH la that I can wilte one set of 
appropriate definitions and use It as a screening module for 
any program I write. Furthermore, I can add this module to 
any existing FORTH program at any convenient time. 

Sin e I think that there must be other people who have 
the same kind of memory problem that I do. I have decided 
to share my current effort with you. This is probably not the 
final form of the module to be set In concrete, but It is 
workable. 1 will use It while I work on improvements. 

COUNTING THE PARAMETERS 

Fortunately, no fan y parsing of the command line Is 
necessaiy In order to determine If there are enough 
parameters on the Data Stack. There already is the word 
DEPTH In FORTH-83 whl h tells us how many 16-bit 
integers are currently on the Data Stack. If your FORTH 
doesn't have DEPTH yet. you can use this deflnttlon, which I 
have taken from Wilson Fcdcrlcci's FF9. 

: DEPTH SP© SO • SWAP - 2/ : 



The components of this definition are common to all of 
the versions of FORTH that I have ever seen, so you should 
not have any trouble using It. Simply comparing the 
number returned by DEPTH with the number of parameters 
whl h should be on the Data Stack will tell you whether or 
not you have enough of them. 



PARSE-COMMAND-LINE 

Screen #27 contains the hea t of the utility. The 
definition for PARSE-COMMAND-UNE uses the algorithm 
shown In Figure 1. 



1. Oount the niattar of cczmand line parameters and caipare 
this couit with the oxpatctad ninfeer of paravwtera. It 
the count la not correct, then print the help screen, a 
proBpt, and abort (the latter two era optional! ■ 

2. It the parameter count la correct, then verify that the 
order end value at each parameter is within reasonable 
expectations. 

Figure 1. The sltanthm Tot PARS &COMM AND- LLVK 



Those of you familiar with C programming will 
recognize ARCC and ARGV . but ARGV has a different 
meaning In this context. 

The calling program must have already stored the 
expected command Tine parameter count into the variable 
AiiGC before calling PARSE-COMMAND-UNE . Line «) of 
screen #27 calls DEPTH. The returned value from DEPTH is 
compared to the value stored In _ARGC . If the returned 
value Is too small, then help Is obviously need, and the 
routine of lines #2-3 Is called. The prompt and ABORT may 
be lelt out, If that Is an appropriate action, but I cannot 
think of a situation where you would not be better olf 
starting over with the program, rather than trying to fix the 
situation with some sort of routine asking for additional 
Input, Go ahead, if you think that I am wrong, but please tell 
all of us how you processed the needed extra parameters. I 
think that It would be a programming nightmare. 

If line # 1 of screen #27 finds that there arc sulll lent 
parameters, the exe utlon skips to line #4, which alls 
ARGV-OK . This routine should do as mu h a possible to 
establish ARGument Validity. This is easy for programs 
which require only a few well defined input parameters, but 
may be difficult for many situations. For obvious reasons, 
my examples are of the first type. 

I doubt that It would be possible to write a generic 
version for ARGV-OK , be ause of the nearly infinite 
number of possible combinations of Input parameters; 
the efore, I have given In, In what 1 hope is a graceful 
manner, and accepted the Inevitable. The example of ARGV- 
OK shown In screen #26 Is for the specific case of two input 
parameters. Furthermore, the first parameter cannot be 
larger than the second, though they could be equaL 

No matter what you do within ARGV-OK , be sure to save 
all of the input parumete s before you do anything else. 
Othe wise, you uld experience an embarrassing crashl 

In my opinion. It Is not necessary for ARGV-OK to return 
an argument (a boolean flag}, since the only possible 
a tions arc either for the program to accept all of the Input 
as valid, or to call for the help screen and nalL Notice that I 
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used QUIT . Instead of ABORT . In this definition, alnce I 
wanted to preserve the contents or the Data Stack. In that 
way, I could pilnt the stack contents and sec where I made 
the mistake. Just be sure to clear the Data St ck before 
resuming operation or going on to other things. 

I also think that ARCV-OK should appear in the 
program, even If you don't know of a current need. You can 
define it this way. 

: ABGVOKNOOP; 

and have the aame effect as a NOOP . Later on. If you 
think of a way to use It profitably, AROV-OK Is already 
there, lust wailing for the expanded dellnltlon. At another 
time. I'll show how to expand this definition without 
having to recompile the whole program. 

The HELP-SCREEN must also be essentially customized 
for the particular application; however screen N25 does 
show a generic help screen which could be used for 
definitions such as Q\ . QL . INDEX . and CLEAR-DISK . 

It may be a little hard t-j understand what is happening 
In screen #25 because of all of the quotation marks 
peppeilng the screen. The phrase ASCII " EMIT causes a 
quotation mark to be displayed, and that Is the only 
universal way to do so from within any FORTH output 
string. Go ahead and substitute if your FORTH offers a 
specialized way to do the same thing. 

Screen *26 shows a very simplified example of an 
application of PARSE-COMMAND- LINE . In the definition 
of EXAMPLE, I have assumed that there would be two Input 
parameters, and that the first parameter cannot be larger 
than the second parameter. This Is the case In my previous 
discussion. 

Line * 1 stores a value of 2 Into Ihe variable _ARCC , 
because 2 Input parameters arc expected. Having prepared 
_ARCC . line »2 now calls PARSE-COMMAND- LINE . 
PARSE-COMMAND-LINE can be made more general by 
requiring (hat the calling program tell It, by means or 
_ARGC . the number of Input parameters to expect Line *3 
contains a NOOP simply because I did not want to confuse 
the sample program with extraneous lines. Screen #29 
shows a real- world application of PARSE-COMMAND- 
LINE . 

CLEAR-DISK 

CLEAR-DISK Is a usefufutlllty which illustrates a 
practical application of PARSE-COMMAND- LINE . The 
purpose of CLEAR-DISK Is to clear a range of screens to 
ASCII spaces. There may be more efficient ways to do this 
lob. but this Is the only way I could think of to do It tn high- 
level FORFH which would work with any FORTH that I have 
ever seen. The only problem would be In the LITERAL value 
of 1024, which Is wrong for Steams Electronics FORFH. 
which has 512-byte screens. Adjust the 1024 to fit your 
situation. 

CLEAR-DISK works by checking for the correct number 
of Input parameters, and whether or not they are In the 
correct older. This question of order is Important, because 
you don't want to go around the 'number circle" in FORTH - 
83 clearing all but the screens Identified In the command 
Unci 

The CR of line *3 Is a sop to my sense of neatness by 
starting a new display line. 

Ihe real work of the utility begins with the DO ... LOOP 
parameters In line *4. The I ♦ adds I to the value of the last 
screen, as Is necessary for proper termination of any 
FORTH DO ... I.OOP . The SWAP reverses the older of the 
sc en numbers, so that they will be In the proper sequence 
of the last- number before the first number. 

In line #5. the phrase I BLOCK toads the screen with that 
number Into RAM and places the address of the screen 
buffer on top of Ihe Data Slack. Ihe UTERAL number, 1024 . 
Is the count of the number of ASCII spaces written Into the 
screen buffer by BIAMK ( BI ANKS Is the proper woid in FIG- 
FORTH ami some others). 
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Ihe UPDATE In line *& marks the screen buffer as 
having been changed, so that it will eventually be written 
back to disk In Its present form of nothing but spaces, 

Ihe phrase I 4 R pilnts the number of the cleared screen 
to let me know that the computer la still doing something 
useful. Ihe 4 R causes the screen numbers to be formatted 
right lustifled in 4 columns. This keeps everything neat and 
orderly on the screen and makes It easy to read at a glance. 

I .OOP simply closes the DO ... LOOP . FLUSH forces the 
last screens to he written back to the disk without waiting 
for other disk activity to happen later. In this way. CLEAR- 
DISK can be the last activity for the session, and the 
computer can be turned offT without me having to be 
concerned about whether or not the last couple of screens 
were actually cleared on the disk. 
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1 2 _AR0C ! \ expected no. of Input perimeters 

2 PARS •TO*wn> LIKE 
1 CR 

< 1- SNAP 00 

5 I BLOCK 1024 BLAB* 

6 VFDATZ 

7 I < ,R 

8 LOOP 

9 FVBSM ; 
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Solutions to TEST ONE problems 



(i) 



Off 1 

(Hi) 






LnJjH^H 



Civ) 



M & 1 € I C PI 

G/0 



2. (I) Ll = (yl' + y3)y2' Note the parentheses (hereinafter referred to as "parens") around Ihe yl" 
and the y3. to indicate that as a pair they are In series with y2'. 

(Ii] Yl = yl'y4' + y2y3 
lUl) Y2 = yl,y2+y3') + y4' 

Don't feel too badly if you didn't get them all right. For many of you this Is new and strange, so 
if you got two or three correct you can feel that you're doing OK. If not. study the solutions and 
compare them with the original problem to decide where you went wrong. In fact, the early part of 
our Journey will most likely seem the most difficult, but a few miles down the road, when you 
become more familiar with the language and customs of this new world, you'll find it all 
remarkably easy. Like learning to ride a bike - it's easy for an accomplished ilder to tell you to 
'Just hop on and pedal'. But once you've sulfered a few bruises, you suddenly find that you can 
balance OK. and from then on you're oil' and away. That's not to say that everything after that Is 
easy. Far from it. as you still have to work hard to pedal up a steep hill! 

Keep In mind my earlier warning, and don't Indicate that you're ready to move on till you feel 
you've got the hang of TEST ONE! So If we're all lit. here goes for the next stage. 

Mile 1 - heading for Mile 2 
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BASIC LAWS OF BOOLEAN ALGEB RA 

Now that we've mastered (more or less) the symbols of Boolean algebra, and have learned how 
to translate a network Into a Boolean expression and back again Into a circuit diagram, it only 
remains to leam eight basic laws and we'll have covered the bulk of Boolean algebra as it applies 
to switching networks. It's not quite as simple as it might seem at first glance, however. Knowing 
the rules, and knowing when to apply them are two entirely different matteis. Only practice, and 
more practice, will make a Boolean expert of you! 

Later on. though, you'll learn much more powerful and easy-to-use techniques which will take 
away a lot of the drudge-work. Rather like using a calculator to figure out the square-root of PI 
Instead of doing it by hand. But first we must leam to crawl, then to walk before we can run! 

Each of the eight laws mentioned above Is really a twin as you'll see from the Table below, and 
It's one of the axioms of Boolean algebra that any law or statement found to be true for a parallel 
circuit has an equally true "dual" in a series circuit, and vlce-veisa. Duals are foimed by Inverting 
in (he given expression all Is and Os. and . and +. but not the letters, or "literals" to give them their 
correct name. For example, the dual of a' + b = 1 Is a'b = 0. Note that the NOT (or complement- 
sign) stayed with the "a". We did not invert the literals to give the incoirect expression ab' « 0. 

I know I said in our first session that Relays, etc.. are symbolised with "y". but for a little while 
I'll use the early letters of Ihe alphabet, as It's easier to say "abc" than "yly2y3 ". 

Here then are the laws, followed by a detailed explanation of each one. as it's more Important 
for you to UNDERSTAND them than to memorise them. 

RULE Parallel Circuit Series Circuit 

1 a+a-a a .a - a 

2 a+a'-l a.a'-O 

3 1 + a - 1 

4 + a - a 

5 a + ab - a 

6 a+a'b-a+b 

7 ab + ac - a . (b + c) (a + b) . (a + c) - a + be 

8 (a + b) ' - a' .b' (a.b) ' - a* + b' 

Some of the rules may look familiar to those of you who are conversant with elementaiy 
algebra, but you'd be well advised not to be misled by the resemblance. Instead, let's look at them 
from a "logical", rather than a mathematical, viewpoint, though we cannot entirely avoid SOME 
math, as we are. after all. learning how to design control-circuits mathematically. I'll Interpret 
these rules for you from two different viewpoints, and you may adopt either one to suit youiself. 

First then, let's look at them from a practical circuit viewpoint. One of the easiest ways I 
know of for a novice to appreciate the tiuth of these laws is to Imagine that we have two boxes. A 
and B. to represent each side of a given equation. Each box has a light mounted on its top. plus a 
few switches labelled "a", "b". "c". etc. Internally, we'll wire up A's light according to the teims on 
the left of the "=" sign in an equation, and B's light according to those on the light of the "=" sign. 
We cannot see the Internal relays or their contacts - all we can see are the switches and the lights 
on the top of each box. Now. if for all IDENTICAL combinations of switches on both boxes, we 
find ourselves unable to distinguish which network Is which, then we can truly say that the left- 
hand expression Is equal to the right-hand one. 

Take the case of Rule 1 for a parallel circuit. One network consists of two N.O "a" contacts. In 
parallel, controlling tts light, and the other of a single N.O "a" contact. Obviously If swltch-a is 
OFF on both boxes (and thus the corresponding relay-A) then both lights will be OFF. and if 
swltch-a IS operated they will both be ON. As these are the only two possible conditions in this 
circuit, then we can say that the law Is TRUE. Similarly with Its dual In a series circuit. Do you 
see this? Forget about mathematics -Just look at It from a practical viewpoint! 
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Coming to Rule 2. parallel clicult, we see that one light Is connected to a network consisting of 
a pair of complementary contacts on relay-A In parallel with each other (that Is. a NO contact and 
a NC contact), while Box-B consists of a simple "1", meaning that its light IS lit - permanently! 
Note that there is no mention of a relay-contact in the right-hand expression here, only a "1" or 
"ON" condition, the swlches on this Box playing no pait In controllolng B's light. We also note 
that whether Box-A's switch-a Is operated or not. Its light will also be permanently ON. either 
through the NC contact If swltch-a Is NOr operated, or vta Its NO contact If the switch IS operated. 
So we can say that Rule 2 Is TRUE. 

Let's continue looking at the parallel circuit laws. By this time It should be easy to interpret 
Rule 3. which states, in eflect. that a permanent wire (that Is. a short-circuit) across a NO contact 
is indistinguishable from a permanent connection on Its own. 

In Rule 4. let's Imagine that we simply cut through the short-circuit Jumper of Rule 3 In Box-A, 
and wire up Box-B's light to a NO-contact on Relay-A. So Rule 4 states, in words, that an open- 
circuit in parallel with an "a" contact cannot be distinguished from an "a" contact on Its own. 
That's not too bad after all. is It? And that's half the Rules covered already. Now we come to 
multiple-relay networks! 

In order to check out the truth of Rule 5, after having wired up both Boxes, we must list the 
state of both Boxes' lights under 4 separate conditions. That Is. (1) neither relay-A nor B operated. 
In which case both Boxes' lights will be OFF. (il) A alone operated (both lights ON); (ill) B alone 
operated (both lights OFF), and finally (tv) both relays operated (both lights ON). 

At this stage, a light should perhaps be beginning to glow ahead of us. and you should see a 
practical application for this Rule. After aJl. If someone designed a circuit according to the lelt- 
hand expression, we can apply Rule 5 and not only sve ourselves the cost of Relay-B. but also do 
the same Job with only one contact. Instead of the original three. Which means less paits. less 
wiring, less chance of a breakdown (only one Relay to go wrong now), and a much simpler circuit- 
diagram, making it MUCH easier to trace a fault If one should occur. 

In fact, even though you may not be able to DESIGN circuits yet, you can at least begin 
simplifying already-existing ones. This is what we'll be doing very shortly. Given a Boolean 
expression representing a circuit or a problem In logic (which, after all. Is what Boolean algebra 
was created for) we can carry out simplification with mathematical precision. 

To continue, we should Interpret these rules In a very general way. That is. we should read 
Rule 5 as saying that If any circuit-block of literals (represented by "a") forms part of a larger 
block (represented by "ab"). then the larger block can be eliminated without further ado. From 
this we conclude that the expression a'bc + a'bcd'e. for instance. Is equivalent to a'bc alone 
(because "a'bc". IN ITS ENTIRETY, foims part of "a'bcd'e"). It would really be an interesting 
exercise for you to check this out on your Light-Boxes! Another way of looking at this would be to 
say 'To make things easier, let's temporarily replace "a'bc" with "x" to give us "x + xd'e". Now we 
can eliminate "xd'e". leaving only "x". or "a'bc". Got it? 

Rule 6 in words says "If there is a block of literals whose COMPLEMENT forms part of a larger 
block, then the complement alone disappears from the larger block". From now on. Instead of 
"block of literals" we'll use the correct word "teim". and at the same time learn two new words. 

If a product term (the significance of "product" will become apparent in the next section), or 
term whose literals are connected by "." or "AND", contains a literal for EVERY relay in the 
control system. It is called a "mlnterm". On the other hand. If the literals form a sum term (that 
Is. they are all connected by "+" or "OR") then It's called a "maxterm". For example, in a system 
which has 3 relays. A. B and C. a'bc Is a mlnterm, but "a" Is not because not ALL the relays in the 
system are Included - thus "a" Is simply a "term". Similarly, a + b + c, or (a + b + c). Is a maxterm, 
but (a + c) is not. 

Rule 7 says "If any term forms part of two distinct terms It may be written down only once (or 
"factored out" to be precise), and then, inside a set of parens, is written down all that remains after 
deleting this common factor." Thus In the series expression for Rule 7. the term "a." Is common to 
both terms "ab" and "ac". so we write down "a." followed by "b + c" Inside parens, as this is what 
would be left If the "a." were removed from the two original terms. Ahat Exactly like ordinary 
algebra, say you math enthusiasts. But watch out for the dual, (a + b).(a + c), which Is not at all like 
ordinary algebra! Here the term "a +" is common to both terms, so we write down "a +", followed by 
"(b). (c)". or more simply "b.c" inside parens, thus "a + (b.c)". and finally "a + be". 
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Rule 8. known as de Morgan's theorem', states the rule for negating (I.e. finding the 
complement, or opposite, of) a term or expression. It may be summarised as : 

"Complement everylhtng, whether literals. Is or Os. or Boolean symbols." 

Take care not to confuse (ab)' with a'b'. a'b' represents two NC-contacts IN SERIES, whereas 
(ab)' Is the complement of "ab". or "a' + b'". Note that In this case the implied "." or "AND" between 
"a" and "b" must also be complemented, giving us a network of two NC-contacts IN PARALLEL. 

Now let's look again at these 8 Rules, without benefit of light-boxes. In order to verify whether 
they're TRUE or not. To begin with, we should read the "OR" sign "+" as a mathematical addition 
sign, and the "AND" sign "." as a multiplication sign. Hence "sum terms" and "product terms". 
Basic Boolean algebra has no subtraction or division! And we'll also replace every NO-contact (on 
a sheet of scrap-paper) with a "1" and every NC-contact with a "0". 

So. In Rule 1. we have 1.1 = 1 and Its dual 1 + 1 = 1. Here again "1.1 = 1" Is the same as in 
ordinary math, but In Boolean algebra (which is restricted to Just Os and Is) "1 + anything" = 1 (see 
Rule 3 for this, where "1 + a" = "1" and "a" can stand for any term whatsoever, even another "1"). 
Unfortunately, the fact that both sides of the equation are equivalent does not necessarily mean 
that It's TRUE for all combinations. However, if one side evaluates to "1" and the other to "0". ihen 
the equation is DEFINITELY FALSE. In the case of Rule 1. therefore, we must try out all other 
Relay combinations. There is only one other possibility - Relay-A becomes energised, and our "a" 
contacts reverse their sign, becoming 0.0 = and + = for the dual. Again bolh sides agree, so 
the total equivalence is TRUE. 

Let's try Rule 5 (series) as a further example. 1.(1 + 1) = 1 reduces to 1.1 = 1 (because "1 + 
anything" = 1) and thence to 1 = 1, which Is obviously TRUE. Now let's try energising Relay-A. to 
give 0.(0 + 1) = 0. which is TRUE, as "0 . anything" = 0. Or in physical terms, an open-circuit In 
series with anything is equivalent to an open-circuit. Similarly. If Relay-B alone Is operated, we 
have 1.(1 + 0) = 1. again TRUE because the "1 + 0" inside the parens evaluates to 1, giving 11 = 1. 
And finally, if both Relays are energised, we'll have 0.(0 + 0) = 0. As the equation holds for ALL 
combinations of Relays, we can finally say that Rule 5 Is TRUE. 

Let's try Rule 8. (1 + 1)' = 0.0. H'm!! 1 + 1 equals 1. reducing the equation to (1)' = 0. In other 
words, the complement of 1 = 0. which is certainly TRUE. Again. If you try all combinations of 
Relays, you'll find the Rule to be consistently TRUE. Just remember : 

a - replaced with "1" if the Relay Is not operated, and "0" if It is. 
a' - replaced with "0" if the Relay Is not operated, and "1" if it Is. 

1 and - remain as is. as a short-circuit remains a short-clcult. no matter what an adjacent 
relay-contact Is doing, and similarly with a "0". or open-circuit. 

A DIFFERENT EXAMPLE OF MINIMISATION USING BOOLEAN ALGEBRA. 

Let's consider a sentential example for a change of pace, that Is. a problem in sentence form, 
by examining the following set of rules for admission to a Computer Club (which shall remain 
anonymous) : 

"A person will be deemed eligible for membership if he/she meets one or more of the following 
conditions :- 

1. Is married, and is 30 years of age or over. 

OR 2. Is a male under 30 years of age. 

OR 3. Has 3 sponsors, is married and under 30 years of age. 

OR 4. Has 3 sponsors and is a married male. 

OR 5. Does not have 3 sponsors, but is a married female. 

On reading these rules, they appear to be straightforward enough, though a little sexist at 
times, and are so clear In their Intent that there doesn't seem to be much we can do with them. 
This is because (as I've mentioned earlier) words have a tendency to "cloud over" the underlying 
meaning, so let's see what Boolean algebra can do with this particular problem. It will serve as an 
excellent example of the application of the laws of Boolean algebra to this type of situation. 

Our first task is to seek out and list the basic phrases, or "variables". In the five conditions set 
out above, as shown in the table 
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VARIABLES : Let male - m female - m' 

married ■ x not married ■ x' 

under 30 - y 30 or over - y' 

3 sponsors - z not 3 sponsors - z' 

That part wasn't too difficult, was it? Next we'll translate the Rules of Membership, and say 
that a peison will be eligible If : 

xy' + my + xyz + mxz + m'xz' 

How about that? Now we can treat It on a purely mathematical basis, without any emotional 
hang-ups over age or sex or sponsors, and see what we can come up with. First we'll "factor out" 
the "x" In terms 1 and 3, which transforms xy' + xyz Into x(y' + yz). and apply Boolean algebra's 
Rule 6 to the contents of the brackets to gtve us x(y' + z). Remember that if a term appears In an 
expression and its complement forms part of a larger teim. then the complement disappears from 
the larger term. Then we'll apply Rule 7 backwards to produce the expanded foim xy' + xz. Putting 
these In place of the original terms 1 and 3, we have : 

xy' + my + xz + mxz + m'xz' which Is a slight reduction. 

Now for a bigger one. We'll apply Rule 5 to terms 3 and 4 of our reduced expression. This Rule 
states that if a term in Its entirety forms part of a larger term, then the larger term disappears. So 
out goes mxz to gtve : 

xy' + my + xz + m'xz' lhat's a LOT betterl 

But we haven't finished yet. Let's take our new terms 3 and 4 and factor out the "x" to give x(z + 
m'z'). and examine the terms Inside the parens. Here again, by applying Rule 6. we can reduce to 
xiz + m), and Just as we did In the first stage of reduction, we'll expand back out to xz + xm*. Now we 
have : 

xy' + xz + xm' + my Another slight Improvement. 

Now for a VERY sneaky operation! First, we'll factor terms 3 and 1 (in that order) to produce 
x(m' + y'). Observe now that term 4 Is a term whose complement (m' + y') forms part of a larger term 
x(m' -i- y'j, so that the complement can disappear from the larger teim (Rule 6), thereby reducing it 
to a simple "x". This means that the whole of the original expression has now been reduced to : 

x + my + xz Now we're getting samewheie! 

but we STILL haven't finished, as we notice that term 1 forms in Its entirety part of term 3, 
which means that the whole of teim 3 can be eliminated, reducing us finally to : 

x + my 

Quite obviously, there is no possibility of any further reduction here, so we can translate this 
expression back Into verbal terms as : 

"A peison Is eligible for membership If mauled or is a male under 30 years of age." 

What an enormous reduction this represents, and there Is no doubt that without this 
mathematical approach It would be EXTREMELY difficult, if not IMPOSSIBLE, to arrive at such a 
solution. Looks like unrnairled females and unmarried males 30 or over are O-U-T. I wonder 
why? 

If nothing else, this example should have demonstrated to you that familiarity with the Rules 
of Boolean algebra does not of Itself solve this kind of problem for you. You must acquire the skill 
to study a given expression and to be able to say. "Aha! Here Is where I'll apply Rule 7. then It will 
be possible to apply Rule 5 dual, and then .... ". So you see. the ability to manipulate or simplify 
Boolean expressions algebraically (at this stage, anyway, until you learn much more powerful, 
much simpler techniques later) depends almost entirely on the recognition of the laws of Boolean 
algebra as they appear In their various forms In the problem Involved. 
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COULD THIS POSSIBLY BE TRUE? 

It has been suggested (1 forget where) that the legal profession, and our lawmakers In 
government, actually apply Boolean algebra In reverse. That is. they begin with a simple 
statement of whatever It Is they wish to Implement, then expand backwards, retaining their 
original Intent, but bringing In more and moie extraneous material (such as the "sponsors" in our 
example above - which turned out to be totally unnecessary), and only when the whole mess Is 
absolutely Incomprehensible - even to themselves - do they finally pass It Into law. For myself. I 
don't believe this for one second! What a suggestion to makel! No, I think they have a natural gift 
for producing verbal obfuscatlons (look that one upl), and if they knew that you and I can now 
apply Boolean algebra to find out what they're REALLY saying, they might even pass another law 
making It a capital offence for us to do so. otherwise we might even discover that they're saying 
nothing of Importance at all! 

BACK ON TRACK AGAIN 

To get back to more serious things, and before we come to TEST TWO. and the end of Mile l, I'd 
like to show you how to use the same sort of technique to simplify a more complicated relay 
network than we've come across so far. 

EXAMPLE Simplify the following network, if possible : 




The first step, as in our previous example for membership, is to derive the logic expressions 
for the two lights in the network These are : 

LI = ab + a'c + be 

L2 = (a + bc)d + a'(b' + cle + d'e 

Don't Just take my word for It. ALWAYS check it out for yourself. Who knows, you may come 
across a typo or two on my partt If so. please let me know. 

OK. let's tackle the simpler LI expression first, and begin by applying Rule 4 to term 3. thus : 

LI = ab + a'c + l.bc 

Then we'll apply Rule 2, and replace the "1" with (a + a'). 'Hey!", you're going to say. "this looks 
more like expansion than simplification!". But bear with me for a while - sometimes we have to 
expand before we can contract. Anyway we now have : 

Ll = ab + a'c ♦ (a + albc which (by Rule 7) expands to : 

LI = ab + a'c + abc + a'bc 

With a double application of Rule 5 to terms 1 and 3, and terms 2 and 4, where in each case a 
term In its entirety forms part of a larger term, the larger terms can disappear, to produce a result 
of: 
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LI = ab + a'c 



where we grind to a halt 



But that's not TOO bad - ailer all, we got a reduction of 33% In our contacts. So now we're ready 
to tackle Llght-2. 

The first thing we notice Is that terms 2 and 3 have an "e" In common, which well factor out. to 
give: 

L2 = (a + bc)d + [a'(b' + cl + die Check this out! 

And then by a stroke of genius we notice that {a'(b* + c) + d) Is the complement of term 1. which 
means, according to Rule 6. that the complement can disappear from the larger term, to give : 

L2 = (a + bc)d + e 

Actually It wasn't a stroke of genius at all! In reality. I wrote lhe expression for Llght-2 so that 
It JUST happened to come out that way. but It DOES serve to demonstrate the technique. 

The resultant network Is shown In Diagram 5b below, which shows that the net result of 
applying Boolean algebra to the two Lights' networks Is a saving of 7 contacts out of an original 16 
- almost 50%. More Importantly, the end circuit Is going to be more reliable than the original, 
and certainly much easier to trouble-shoot In the event of circuit malfunction. 




Did we all manage to get through that bit of a swamp, or Is someone still bogged down back 
there? If so. Just relax a little, re-read the text, and take another run at It. If you still find yourself 
floundering, don't Just thrash around. Come up for air, and take it one step at a time? Soon you'll 
be learning a new system which will AUTOMATICALLY apply all the correct Rules of Boolean 
algebra to an expression and enable you in one step to go directly from the original expression to 
the finally simplified one. But don't neglect to study all that I've Just been explaining to you on 
that account ... you'll still find a knowledge of Boolean algebra a VERY useful skill to have at your 
finger-tips. Anyway, shortly after learning the new system, and how to use it to simplify 
expressions, we'll be designing our first simple control-circuits directly from a set of verbal or 
written Instructions. 

Here's a simpler example of reduction, for a little light relief : 

EXAMPLE Simplify the following expression 
(a + b)(a + b + c + d) 

We'll do this one three different ways, believe it or not. Firstly, we can apply Rule 5 and say 
"Here we have a term (a + b) which in its entirety forms part of a larger term (a + b + c + d). so the 
larger term can disappear, to leave only (a + b), or a + b." Secondly, we could say "We'll factor out 
the common (a + b +) to give a + b + 0.(c + d). which again gives us simply a + b. Note that In this 
case we have to visualise (a + b) as being (a + b + 0), to leave us with when we remove the common 
factor (a + b +). Thirdly, and you should keep this technique In mind, we can say "Let's take the 
dual of the expression, to give (remember the rules for forming a dual?) ab + abed. Now we can 
"disappear" the term abed, leaving only ab. and then dual tt back again to its original form to 
produce a + b." 

New Boolean usages coming up - the original expression above Is called a "product of sums" 
expression (keep In mind the Implied ".". or multiplication, between the two sets of parens) and its 
dual "ab + abed" Is called a "sum of products" expression. Just note this casually In passing I 

CbnttriMd on page 37 
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Flag accessibility, Fast Task Multiplexing, Qean Interrupt 
Handling, etc. for the 'Pro*. Excellent "Learning" tool! 
Color Computer ONLY if 8.95 
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FORTHBUILDER ii I Hand alone taigcl compiler (cnattcompilcr) for 
producing custom Forth systems and application programs. 
All of the 83-tuuidaid defining word* end control structures ve 
recognized by FORTHBUILDER. 

FORTHBUILDER ii designed to behave as mudi as possible like 
• resident Forth interpreter/compiler. <o thai most of Ihe 
established techniques for willing Forth code cm be used without 
change. 

Like compilers for other Languages, FORTHBUILDER can operate 
in "batch mode*. 

The compiler recognlact and emulates target names defined by 
CONSTANT or VARIABLE and is readily extended with 
"com pile-time" definitions to emulate specific target words. 
I < IKTIIHI II Dl-.K is luppliad as an executable command file 
configuicd for a specific host system and target processor. Object 
code produced from the access) panying model source code is 
royalty-free to licensed users. 
F.CCF.S- S99.95 

DATABASE ACCOUNTING 

XDMS from Westchester Applied Business Systems 

FOR 6*09 FLEX.SK«DOS<5/8") 

Up to 32 groupt/Tiekli per record! Up to 12 character filed namel Up to 
1024 byte records I User defined screen and p ml controll Process 
fileil Form files! Conditional execution) Process chaining] Upwaid/ 
Downwaid file linking! File joining] Random file virtual paging! 
Built in utilities] Built in text line ediiot I Fully session oiicmedl 
Enhanced forms! Boldface, Double widili, Italics and Underline 
nqjpunadl Written in compact structuied assemUcrl Integrated for 
FAST execution] 
XDMS-IV Data Management System 

XDMS-IV is a brand new approach to data management. It not only 

permits users to describe, enter and retrieve data, bin also to process 
entire files pioductng customized reports, screen displays and file 
output. Processing can consist of any of a set of standard high level 
functions including record and field selection, soiling and 
aggregation, lookups in other files, special processing of record 
subsets, custom report formatting, totaling and aubtotaling. and 
presentation of up to three related files as a "database" on user 
defined output tepons. 
POWERFUL COMMANDS! 

XDMS-IV combines the functionality of many popular DBMS software 
systems with a new easy to use command set into a single inlegiated 
package. We've included many new features and commands 
including a set of gencia] file utilities. The processing commands 
are Input-Process -Output (IPO) orteme which allows almost instant 
implementation of a process design. 



SESSION ORIENTED I 

XDMS-IV is session oriented. Enter "XDMS" and you are in instant 
command of all the features. No more wailing for I commend to 
load in from disk! Many commands are immediate, such as 
CREATE (lile definition). UPDATE (file editor), PURGE and 
DELHI E (utilities). Oih e rs a re process com minds which are used 10 
create a user process which is executed with a RUN command. 
Eiilier may be enteied into a "process" file which ia executed by an 
EXECUTE statement. Processes may execute other processes, or 
themselves, eiihei conditionally or uncmdilicoaily. Menus and 
screen prompts ire easily coded, and entire user applications on be 
run without ever leaving XDMS IV 

ITS EASY TO USEI 

XDMS-IV keeps data management simple! Raiher than design a complex 
DBMS which hides the true nature of the data, we kept XDMS-IV 
file orienlad. The user view of data relationships is prexeniad in 
reports and screen output, while ihe actual data resides in easy to 
maintain fdes 1 his aspect permits customized presentation and 
reports without complex redefinition of Ihe database files and 
structure. XDMS-IV may be used for a wide range of applications 
from simple record management systems (addresses, inventory ...) 
to integrated database systems (order cntiy, accounting...) 

The possibilities are unlimited ... 
FOR 6809 FLEX-SK-lrOS^tt") $249.95 



ASSEMBLERS 

ASTRUK09 from S E. Media - A "Struomed Assembler for the 6809" 
which requires the TSC Macro Assembler. 
F.S.CCF-S99 95 
Macro Assembler for TSC - The FLEX, SK-DOS STANDARD 
Assembler. 

Sp*cio) -CCF VSM: F.S 150 DO 
OSM Extended 6809 Macro Astcmbler from Lloyd I/O. - Provides local 
labels. Motorola S - records . end Intel Hex records; XREF 
GeneOrate OS-9 Memory modules under FLEX. SK'DOS. 
FLEX. SK'DOS. CCF. OS-9 S99.00 
Relocating Assembler/Linking Loader from TSC — Use with many of 
Ihe C and Pascal Compilers. 
F, S. CCF ! 150.00 
MACE, by Graham Trott from Windnuh Micro Systems — Co-Resident 
Editor and Assembler: fast interactive A.l. Programming for small 
to medium-sited Piograms. 
F.S.CCF-S7SM 
XMACE -- MACE w/Cross Assembler for 6800/ 1/2/3/8 
F.S.CCF.S9SD0 
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UTILITIES 

IUsic09 XRef from S.E. Media - Ihii Baiic09 Cross Reference Utility 
ii ■ B»sic09 Program which will produce a "pretty pi in led" lining 
wit each line numbered, followed by i complete crosi referenced 
lining of all vaiiablei, external procedures , and line number* called. 
Alio includes a Program List Utility which outputs a fan "pretty 
ptinied" lining with line number*. Require! Basic09 or RunB. 
£ CCO obj. only - S39.9S; wl Source . S79.95 

BTrec Roullnea - Complete id of routines to allow simple 

implementation of keyed file* . for your program - running under 
Buic09. A real time laver and ihould be a patt of eveiy serioua 
programmen tool-box. 

O A CCO obj. only - S89.95 

Uctdata PASCAL UTILITIES (Requires Pascal vcr 3) 

XREF — produce a Cross Reference Lining of any tut; oriented to 
Pascal Source. 

INCLUDE - Include other Files in a Source Text, including Binary - 
unlimited nesting. 

PROFILER - provides an Indented. Numbered. "Struclog rem" of a 
Pascal Source Text File; view the ovt/al) structure of laige 
programs, program integrity, etc. Supplied in Pascal Source Code; 
requires corncalaucn. 

F. S. CCF ... EACH i'-HODO. 8" - 15000 

DUB from S.E. Media - A UnlFLEX BASIC decompiler Recreate a 
Sounx Lining from UniFLEX Compiled basic Programs. Works 
ml ALL Versions of 6809 UniFLEX basic. 
U-S2I9 9S 

LOW COST PROGRAM KITS from Southeast Media The following 
kits are available for FLEX . SK'DOS on either S" or 8" Disk. 

1. BASICTOOL-CHEST $29.95 
BUSTER, CMD: pretty primer 
LbNEXREF.BAS: line cross refercneer 
REMPAC.BAS. SPCPAC.BAS. COMPAC BAS: 
remove superfluous code 

STR1P.BAS: supctfluous line-numbers stripper 

2. FLEX, SK'DOS UTILITIES KIT $39.99 
CATS. CMD: alphabetically-sorted directory listing 
CATD.CMD: date-sorted directory listing 
COPYSORT.CMD: file copy , alphabet icalty 
COPYDATE CMD: Tile copy, by date-order 
FUEDATB.CMD: change file creation date 

INFO.CMD (A INF0GMX.CMD): tells disk attributes Aconlenu 

RELINK CMD (A RELINK 82): reorders fragmented free 

chain 

RESQ CMD: undeletes (recovers) a deleted file 

SECIORS.CMD: show shoot order in free chain 

XLCMD: super text lister 



3. ASSEMBLERS/DISASSEMBLERS UTILITIES 

$39.95 
LINEFEED CMD: 'modularise' disassembler output 
MATH. CMD: decimal, hex. binary, octal conversions 
A tables 
SK1P.CMD: column stripper 

4. WORD -PROCESSOR SUPPORT UTILITIES 

$49.95 
FULLSrOP.CMD: checks lor capitalization 
BSTYC3T.BAS (.BAC): Stylo to dot -matrix primerr 
NECPRLNT.CMD: Stylo to dot-matrix primer filter code 

5. irriLrriES for indexing wss 

MENU B AS: selecis required program from list below 
[NDEX.BAC: word index 
PHRASES BAC: phrase index 
CONTENT.BAC: table of contents 
DNDXSORT.BAC: fast alphabetic sort routine 
FORM A'ltK. BAC: produces a 2-column fortruuud index 
APPEND.BAC: append any number of files 
C11AR.BIN: line reader 

BASIC09 TOOLS com in of 21 uibiraaunu for Bsric09. 
6 were written inC Language and the remainder in assembly. 
All the Rjutines are compiled down to native machine code which 
make* them fan and compact. 

1. C FILL - nils a siring with charaaers 

2. DPEEK - Double peek 

3. DPOKE ~ Double poke 

4. FPOS - Current Tile position 
3. FSIZE - File size 

6. 1"TRIM — removes leading spaces from a string 

7. GETPR - reiums the current process ID 

8. CETOPr -gets 32 byte opt ion section 

9. CETUSR - gets the user ID 

10. CTIME-- gets the time 

1 1. INSERT — insen a string into another 

12. LOWER - converts a siting into lowercase 

13. READY - Checks for available input 

14. SKTPRIOR - changes a process priority 

15. SBTUSR - changes the user ID 

16. SETOPI" - set 32 byte option packet 

17. STIME - seta the lime 

1 8. SPACE •- adds spaces to a string 

19. SWAP - swaps any two variables 

20. SYSCALL - system call 

21. UPPER - converts a string to uppercase 

For OS-9 - $44.95 - Includes Source Code 

Sec Review in Januaty 1987 issue of 68 Micro Journal 
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SOFTOOLS 

The following programs are included in object form for immediate 
application. PW source code available for cuslomizauon. 

READ-ME Complcie instructions for initial set-up and operation. Can 

even be piinted out with the included text processor. 
CONFIC one time system configuration. 

CHANCE changes words, characten, etc. globally to any texltype file. 
CLEANTXT converu text files to standard FLEX. SK'DOS fitei. 
COMMON compare two text files and reports differences. 
COMPARE another check file that report! mis-matched linea. 
CONCAT similar to FLEX. SK'DOS append but can also list file* to 

screen. 
DOCUMENT for PU9 source files. Very useful in examinin g parameter 

passing ajpecti of procedures. 
ECHO echo* to either screen or file. 
F1ND an improve find command with "pattern" matching and wildcards. 

Very useful. 
HEX dumps Tiles in both hex and ASCII 
INCLUDE a file copy piogram that will accept "includes" of other disk 

filet. 
KWIC allows rotating each word, on each line lo the beginning. Veiy 

useful in a son program, etc 
LISTDIR a directory listing program. Not super, but bene? than CAT. 
MEMSORT a high-spaed text file sorter. Up lo 10 fields may be toned. 

Very fast. Very useful. 
MULTICOL width of page, number of columns may be specified. A 

MUST) 
PACE similar to LIST but allows for a page header, page width and 

depth. Adjust for CRT screen or printer at set up by CONFIG. A 

very smen print diiver. Allows piinler control eensnandt. 
REMOVE a fast file deleter. Careful, no piompts issued. Zap, and its 

gone I 
SCREEN a screen listing utility. Woid wraps text to fit screen. Screen 

depl h may be altered at run time. 
SORT a super version of MEMSORT. Ascending/descending order, up 

lo 10 keys, case over-tide, son on nth word and ton on characters if 

file is rmall enough, sons in RAM. If large file, son is constrained 

lo size of your largest disk capacity. 
TPROC a small but nice text formatter. This it a complete formal ter and 

has functions not found in other formatters. 
TRANSLIT sorts a file by x key fields. Checks for duplications. Up to 

10 key files may be used, 
UN ROTATE used with KWIC this program reads an inpii file and 

unfolds it a line at a lime. If the file has been toned each woid will 

be presented in saquence. 
WC a word count utility. Can count words , charaoe rs or tines. 

NOTE: thai act of utilities consists of 6 5-1/4" disks or 2 *" dlstu, w/ 
source (PL9). 3 5-1/4" dlafta or 1 g" disk w/o source. 
Complete set SPECIAL INTRO PRICE: 
5-1/4" w/source FLEX - SK'DOS - $129.95 
w/b source - 579.95 
8* w/touru! - $79.95 - w/o source $49.95 



FULL SCREEN FORMS DISPLAY from Computer Systems 

Consultants — TSC Extended BASIC program supports any Serial 
Terminal wiih Cursor Control or Memory-Mapped Video Displays; 
substantially extends the capabilities of the Program Designer by 
providing a table-driven method of describing and using Full Screen 
Displays. 

F. S and CCF, U-STSOO.vl Source - ISO 00 

SOLVE from S.E Media • OS-9 Levels I and D only. A Symbolic 
Object/Logic Verification A Examine debugger. Including inline 
debugging, disassemble and assemble. SOLVE IS THE MOST 
COMPLETE DEBUGGER we have seen for the 6809 OS-9 series! 
SOLVE docs it alii With a rich selection of monitor, assembler, 
disassembler, environmental, execution and other miscellaneous 
commands. SOLVE is the MOST POWERFUL toolkit item you 
can ownl Yet. SOLVE is simple to use! Willi complete 
documentation, a inapt Everyone who bat orderad this package hat 
raved! See review • 68 Micro Journal - December 1985. No "blind" 
debugging tiers, full screen displays, rich and complete in 
informs Lion pTUcmed. Since review in 68 Micro Journal, this is our 
fittest mover! 

Unit I A II only ■ OS-9 S69.9S 



DISK UTILITIES 

OS-9 VTXsfc from S.E. Media - For level 1 only. Use the Extended 
Memory capability of your SWTPC or Gimix CPU card (or similar 
formal DAT) for FAST Program Compiler.. CMD execution, high 
spaed inter-process communications (without pipe buff en), etc. - 
SAVE that System Memory. Virtual Disk size is variable in 4K 
inarOrnenlt up lo 960K. Some Assembly Required. 
Unit OS.9 obi. 179 9i; »< Sourct S149.95 

OF from S.E. Media - Written in BASIC09 (with Source), includes: 
REFORMAT, a BASIC09 Program that reformats a chosen amount 
of an OS-9 disk to FLEX. SK'DOS Formal so it can be used 
normally by FLEX. SK'DOS: and FLEX, a BASIC09 Piogram that 
does the actual read or wr ite function to the special O-F Transfer 
Disk; user-friendly menu driven. Read the FLEX. SK'DOS 
Dircctoiy, Delete FLEX, SK'DOS Filet, Copy both diicctions.eic. 
FLEX, SK'DOS users use the special disk just like any other FLEX, 
SK'DOS disk 

O. 6809/68000 S79.9S 

LSORT from S.E Media - A SORT/MERGE package for OS-9 (Level 1 
A D only). Sons racoids with fixed lengths or var iable lengths. 
Allows for either ascending or detcenduig tort. Sorting can be done 
in either ASCII sequence or alternate collating aaquence. Right, left 
or no justification of dan fields available. LSORT includes a full 
set of comments and errors messages. 
OS-9 185.00 
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HIER fiam S.E. Madia - HIER is a modern kitrarchal storage system for 
users under FLEX. SK'DOS. It answers the needs of those who 
have hard disk capabilities on their lynenu . or mny files on one 
disk - any tile. Using HIER a regular (any) FLEX, SK'DOS 
disk (8 • S • haid disk) can have tub directories. By ihit method 
the problems of assigning unique name* to files it let* burden tome. 
Different filet with the exact tame name may be on the time ditk, 
at long at they arc in diffcrcn t dindaSei . For the Winchester uter 
tbit becomes a mutt. Sub-diradonei are the modem day solution 
that all current large systems use. E»ch directory look* to FLEX, 
SK'DOS like a regular file, except they have the extension 
'.DIR' A full let of directory handling program! are included, 
making tbe operation of HIER timple and strsighlforwaid. A 
special install package it included to install HIER to your particular 
version of FLEX. SK'DOS. Some assembly required. Install 
indicates each byte or teference change needed. Typically - 6 byte 
changes in source (rumished) and one assembly of HIER is all that 
isicquired. No programming required! 
FLEX - SK'DOS S79.9S 

COPYMULT from S.E. Media - Copy MRGE Disks 10 several 

smallerdisks. FLEX. SK'DOS utilntes allow the backup of ANY 
size disk to any SMALI.ER site diskettes (Hard Disk to floppies, 8" 
to 5". etc) by simply i selling diskettes at lequetled by 
COPYMULT. No fooli g with directoiy deletions, etc. 
COPYMULT.CMD undersuuvJs normal 'copy* syntax and keeps up 
with lues copiad by maintaining directniie* for both host and 
receiving ditk system. Alto includes BACKUP.CMD to download 
my size "random" type file; RESTORE CM D to rettnicturc copied 
"random'' filet for copying, or recopying back to the host system; 
and FREELINK.CMD at a "bonus" utility that "relinks" the free 
chain of floppy or hard disk, eliminating fragmentation. 

Completely documented Assembly Language Source /ties included 
ALL 4 Programs (FLEX. SK'DOS. 8' or y) $99. X 

COPYCAT fiom Lucidala Pascal NOT required. Allows readi g 

ISC Mini-FLEX. SK'DOS, SSB DOS68. and Digital Retcarcli CP/ 
M Disks while operating under SK'DOS . FLEXl.O. FLEX 2.O. or 
FLEX 9.0 with 6800 or 6809 Systems. COPYCAT will not 
perfoim miiaclet, but, between the program and the manual, you 
stand a good chance of accomplishi g a transfer. Also includes 
tome Utilities to help out Programs supplied in Modular Source 
Code (Assembly Language) to help tolvc unusual problems. 
F.SandCCFS-SSOJOO F.S 8--S65M 

VIRTUAL TERMINAL from S.E. Media - AUowt one terminal to do 
the wotk of several. Tile user may start as many as eight task on one 
terminal, under VIRTU ALTEHMINAL and swjicli back a d forth 
between task at will. No need to exit each one; just jump back and 
forth. Complete with configuration program. Tlie best way to keep 
up with those background programs. 
O A CCO - obj. only • S49.95 



FLEX, SK'DOS DISK UTILITIES from Computer Systems 

Consultants -- Eight (8) different Assembly Language (w/ Source 
Code) FLEX, SK'DOS Utilities for every FLEX. SK'DOS Users 
Toolbox: Copy a Ftk wiih CRC Errors: Test Disk for errors; 
Compare two Disks; a fait Disk Backup Program; Edit Disk 
Sectors: Linearize Free Chain on the Disk; print Disk Ideniilicaiion; 
and Sort and Replace the Disk Directoiy (in sorted order). - PLUS 
- Ten XBASIC PlvgraiM including: A BASIC Resequenccr with 
EXTRAS over "RENUM" like chuck for missing label definitions. 
processes Disk to Disk instead of in Memoiy, etc Other programs 
Compare, Merge, or Generate Updates between two BASIC 
Programs, cbeck BASIC Sequence Numbers, compare two 
untequenced files, ind 5 Programs for esiabbshing a Master 
Directory of several Disks, and toning, felentng, updating, and 
ptinibig paginated listing t of these files. A BASIC Crots-Reference 
Piogram, wiiiten in Assembly Language, which provides ait X-Ref 
Listing of the Variable! and Reserved Words in TSC BASIC. 
XBASIC. a d PRECOMPILER BASIC Programs. 

ALL Utilities include Source* (either BASIC or A L. Source Code). 
F.SandCCF iSO.OO 
BASIC Utilities ONLY for UniFLEX ■■ S30M 

COMMUNICATIONS 

CMODEM Telaoomm unicationi Piognrm from Computer Systems 

Consultants. Inc. — Menu-Driven: supports Dumb- Terminal Mode, 
Upload and Oownload in non-protocol mode, and the CP/M 
"Modem7" Qtnisiensen protocol mode to stable eommunicnion 
capabilities for almost any icquirement. Written in "C". 

FLEX. SK'DOS. CCF. OS-9. UniFLEX. 68000 <a 66MA 
Sourer 1100.00 - without Source MOM 

X-TALK from S.E. Media - X-TAIJC consists of two disks and a special 
cable, the hookup enables a 6809 SWTPC computer to dump 
UniFLEX files directly to the UniFLEX MUSTANG 020. This is 
the ONLY currently available method to transfer SWTPC 6809 
UniFLEX files to a 68000 UniFLEX synem. Gunix 6809 users 
may dump a 6809 UniFlf X file to a 6809 UniFLEX five inch disk 
and it is readable by the MUSTANG-020. Ttie cable is specially 
prcpaied with internal connection! to match the non-standaid 
SWTPC SO/9 I/O Db25 ohhmot. A tpecial SWTPC S+ cable set 
is also available. Users should specify which SWTPC system he/ 
she wishes to communicate with the MUSTANG 020. The X- 
TALK software is furnished on two disks. One eight inch disk 
contains S.E. Media modem program C-MODEM (6809) and the 
other disk is a MUSTANG-020 five inch disk wish CMODEM 
(68020). Text and binaiy f i es may be directly transferred between 
the two lytlemt. The C-MODEM programs are unaltered and 
peiform as excellent modem programs also. X-TAIJC can be 
purchased wiih or without the special cables, but this special price is 
available to registered MUSTANG-020 users only. 

XTALrt Compleu (coble. 2 disks) I99.9i 

XTAUC Software (2 disks only) S69.95 

XTALK with CMODEM Source H49.95 
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XDATA from SB. Media - A COMMUNICATION Package for the 
UoiFLEX Operating System. Use with CP/M. Main Frames, other 
UniFLEX Systems, etc Verifies Transmission uiing checksum or 
CRC; Re-Traruro iit bad block i, etc. 
U.t299M 

EDITORS & WORD PROCESSING 



JUST from S.E. Media - Text Formatter developed by Ron Anderson: 
for Oct Matrix Printers, provides many unique features. Output 
"Formattad" Text to the Display. Use the FPRXNT.CMD supplied 
for producing multiple copies of the "Formatted" Text on ihe Printer 
INCLUDING IMBEDDED PRINTER COMMANDS (very useful 
at other times also, and worth the price of Ihe program by itself). 
"User Configurable" for adapting to other Prtnun (comes set up for 
Gpson MX -SO with Graiirax); up to ten (10) imbedded "Printer 
Control Commands". Compensates for a "Double Width' piinied 
line. Includes the normal line width, margin, indent, paragiaph. 
space, veitical skip lines, page length, page numbering, centering, 
fill, justification, etc. Use with PAT or any other editor. 

' Now supplied as a two disk set 

Disk 01: JUST2.CMD object file. 

JUST2.TXT PL9 source:Fl£X. SK'DOS - CC 

Disk »2: JUS7SC object and source in C: 

FLEX. SK'DOS . 0S9 • CC 

Ihe JTSC and regular JUST C source are two separate piograms. JTSC 
compiles to a version that expects TSC Word Processor type 
CDTunaiids, (.pp .ip .ce etc.) Cteal for your older text files. The C 
source compiles to a standard syntax JUSTCMD object lile. Using 
JUST synax (,p ,u y etc) With all JUST functions plus seveial 
additional printer formatting functions. Reference the TUSTSC C 
source. For those wanting an excrllent BUDGET PRICED woid 
processor, with features none of ihe others have. This is ill 

Disk (j) ■ PL9 FLEX onlf F.SA CCF . $49.95 
Disk Set (2) • F. S a\ CCF A 0S9 (C version) . $69 95 
OS-9 68KOOO complete with Source . $79.95 

PAT from S.E. Media - A full feature screen or ented TEXT EDITOR 
with ill ihe best of "PIE™ ". For those who swore by and loved only 
PIE, Ihis is for youl All PIE features and much more) Tou many 
features lo list. And if you don I like these,, change or add your own. 
PL9 source furnished. "C" source available soon. Easily 
configured to yourCRT, with special CO Jig section. 
Regular Fl£X, SX'DOS 1129.50 
• SPECIAL 1NTRODUC1JON OFFER ' $79.95 
SPECIAL PAVJUST COMBO (w/sourct) 

FLEX, SK'DOS $99.95 
OS-9 6SK Version 122900 
SPECIAL PAT/JUST COMBO 68K $24900 
Note: JUST in "C" source available for 0S.9 



CEDRIC from S.E Media ■ A screen oriented TEXT EDFIOR with 
availability of 'MENU' aid. Macro definitions, configurable 
permanent definable MACROS' - all slandaid features and the 
fasten 'global' functions in Ihe west A simple, automatic terminal 
cool ig program makes this a real no hassel' product. Only 6K in 
size, leaving ihe average system over 165 sectors for text buffer - 
eppx. 1 4,000 plus of free memory I Extia fine for piogramming at 
well as text 

FLEX. SK'DOS $69.95 

B AS-EDIT from S.E. Media • A TSC BASIC or XBASIC screen editor. 
Appended lo BASIC or XBASIC, BAS-EDIT is transparent lo 
normal BASIC/XBASIC operation. Allows editing while in 
BASIC/XBASIC. Supports the following functions: OVERLAY, 
INSERT and DUP LINE. Make editing BASIC/XBASIC piograms 
SIMPLE! A GREAT lime and effort taver. Programmers love itl 
NO more retyping entires lines, etc. Complete vrilh over 25 
different CRT terminal configuration overlays. 
FLEX. CCF. SK'DOS $39.95 

SCREDITOR III from Windniah Micro Systems - Poweiful Screen - 
Oriented Editor/Woid Pncsasor. Almost SO different commands; 
over 300 pages of Documentation with Tutorial. Features Mulli- 
Column display and editing, "decimal align" columns (AND add 
them up automatically), multiple keystroke macros, even/odd page 
headers and footers, imbedded printer control codes, all 
justifications, "help" support, store common command series on 
disk. etc. Use supplied "set-ups", or remap the keyboard to your 
needs. Except for proportional priming, this package will DO IT 
ALU 

6800 or 6809 FLEX. SK'DOS or SSB DOS, OS 9 - $17500 

SPELLB "Computer Dictionaiy" from S.E. Media - OVER 150,000 
words! Look up a word from within your Editor or Word Processor 
(with the SPII.CMD Utility which operates in the FLEX. SK'DOS 
UCS). Or check and update Ihe Teal after enuy, ADD WORDS to 
the Dictionaiy, "Flag" questionable words in the Text, "View a word 
in aonlexr before changing or ignoring, etc SPELLB Tint checks a 
"Common Word Diclionaiy", then the normal Dictionaiy, then a 
"Personal Wotd List", and finally, any "Special Wotd List" you may 
have specified. SPELLB also allows the use of Small Disk Storage 
systems. 

F . S and CCF - $129.95 

STYLO-GRAPH from Great Plains Compiler Co. A full-screen 

oriented WORD PROCESSOR - (uses Ihe 51 x 24 Display Screens 
on CoCo fLEX/SK'DOS.or PBJ Woidpak). Full screen display 
and editing; supports Ihe Daisy Wheel propoiiional pnmert. 
NEW PRICES 6809 CCF and CCO ■ $99.95, 
F.Sor $179. 95. U $299.95 
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STYLO-SPELL fnm Great Plain* Compact Co. - Fast Computer 
Dictionary. Oanplemenu Slylogiapli. 

NEW PRICES 6809 CCF and CCO - S69.95, 

F.S or 0-S99.9S.U. 1149.95 
STYLO-MERGE from Crest Plains Computer Co. - Merge Mailing 
List la "Form" Lenen . Print multiple File*, etc, through Sryto. 

NEW PRICES 6809 CCF and CCO ■ S59.95. 

F.SorO- S79 95.V-S129.95 
STYLO-PA K _ Graph ♦ Spell ♦ Merge Package Deal 111 

F.SorO ■ S329.95. U . S549.9S 

0. 68000 1695.00 



MISCELLANEOUS 

TABULA RASA SPREADSHEET from Computer Systems 

Consultant! - TABULA RASA is similar to DESKTOP/PLAN: 
provide* use of tabular compulation schemes used for analysis of 
business, sales, and economic conditions. Menu-driven; extensive 
report -general! on capabilities. Rejoins TSCi Extended BASIC. 
F.S and CCF, U . SSOiOO, w/ Sourc* - SIOOOO 

DYNACALC - Ekaroo ic Spread Shea for (he 6809 and 68000. 
F, S. OS-9 and SPECIAL CCF - 1200 DO, U . 1395.00 
OS-9 68K-S595.00 

FULL SCREEN INVENTORY/MRP from Computer Systems 
Consultants - Use die Full Screen Inventoiy System/Material* 
Requirement Planning for maintaining invanonc*. Keeps item field 
file in alphabetical older for easier inquiry. Locate and/or print 
records matching partial or complete item, description, vendor, or 
attributes; find backorder or below stock levels. Print-outs in item 
or vendor order. MRP capability for the maintenance and analysis 
of Hierarchical assemblies of items in the inventoiy Tile. Requires 
TSCs Extended BASIC. 

F, S and CCF. U - S50M, w/ Sourc* ■ S100M 

FULL SCREEN MAILING LIST from Computer Systems Consultants 
- The Full Screes Mailing List System provides a means of 
maintaining simple mailing lists. Locale all records matching on 
partial or complete name, city, state, zip, or attributes for Listings or 
Labels, etc. Requites TSC's Extended BASIC. 

F. Sand CCF. U ■ 150.00. W Source ■ SIOOOO 

DIET-TRAC func*Ha from S.E. Media -An XBAS1C program that 
plans a diet in terms of eiilier clones and percentage of 
carbohy dialcs, proteins aid fats (C P G%) or grams of 
Carbohydrate. Protein and Fat food exchanges o each of the six 
basic food groups (vegetable, bread, meat, skim milk, frail and fat) 
for a specific individual. Sex, Age, Height. Present Weight, Frame 
Size, Activity Level and Basal Metabolic Rate for normal individual 
arc taken into account. Ideal weight and sustaining calories for any 
weight of the above individual are calculated Provides number of 
days and daily calendar after weight goal and calorie plan is 
determined. 

F.S S59.95, US89.95 



CROSS ASSEMBLERS 

TRUE CROSS ASSEMBLERS from Computer Systems Consultants - 
Supports 1802/5, Z-80. 6800/1/2/3/8/11/110 I, 6804. 68QS/1IC05/ 
146805. 6809AXV01. 6502 family. 8080/3. 8020/ 1/2/3 5/C3 5/39/ 40/ 
48/C48/49/C4 9/50/87 48/49. 8031/51/8751. and 68000 Systems. 
Assembler and Listing formats same asuigct CPU's format. 
Produces machine independent Motorola S-TetL 
68000 or 6809, FLEX. SK*DOS. CCF. OS-9. UniFLEX 
any object or jeurae each ■ 15000 
any 3 object or source each ■ SI0OW 
Set of ALL object S200O0 ■ witouret tSOOM 



XASM Cross Assemblers for FIEX. SK'DOS from S.E. MEDIA - 
This setof 6800/1/2/3/5/8. 6301.6502.808075. and Z80 Cross 
Assemblers uses the familiar TSC Macro Assembler Command Line 
and Source Code forms!, Assembler options, etc., in providing code 
for the target CPU's. 

Complete set. FLEX. SK'DOS only ■ SI50.00 
CRASMB from LLOYD I/O - Supports Mouxols's. Intel's, Zilog'i.and 
others CPU syntax for these 8-Bit microprocessors: 6800, 6801, 
6303. 6804, 6805, 6809. 681 1 (all varieties): 6502, 1802/5. 8048 
family. 8051 family. 8080/85. Z8. Z80. and TMS-7000 family. 
Has MACROS. Local Labels, Label X REF. Label Length to 30 
Chars. Object code formats: Motorola S-Raccrds (text), Intel HEX- 
Records (text), OS9 (binary), and FLEX. SK»DOS (binsiy), 
Written in Assembler .- eg. Very Fan. 
CPU TYPE • Prke each: 

For MOrOROLA INTEL OTHER COMPLETE SET 
FLEX9 $150 S150 $150 $399 

SK'DOS $150 $150 $150 $399 

OS9AS809 $150 $150 $150 $399 

OS9AS8K — — $432 

CRASMB 16.32 from LLOYD I/O - Supports Motorola's 68000. and 
has same features as the 8 bit version. OS9AS8K Object code 
Format allows this cross assembler to be used in developing your 
piognmi for OS9AS8K on your OS9/6809 computer. 
FLEX. SK'DOS. CCF, OS-9/6809 S249.00 

GAMES 

RAPIER - 6809 Chess Program from S.E. Madia - Requires FLEX, 
SK'DOS and Displays on Any Type Terminal Features: Four 
levels of play. Swap side. Point scoring system. Two display 
boards. Change skill level. Solve CVckm ate problems in 1-2-3-4 
moves. Make move and swap side*. Play while or black. This Is 
one of Um strongest CHESS programs running on any 
microcomputer, e»vnof«i USCF Rating 1600* (belter than mart 
'club' players at higher teveh) 
F. Sand CCF -S79.95 
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A LITTLE BACCROVND MATERIAL 



By way of a little background. I'm not a professional teacher. At one time I was a Systems 
Designer for a large electrical manufacturer in Toronto. Ontario, and was heavily Involved with 
automating the plant's production machinery. We also did custom automation for other large 
companies. We had a staff of about 450 - 500. I think. Anyway, each fall and winter I would 
conduct, after hours, for the benefit of anyone who wished to attend, a series of ln-plant lectures 
on the mathematical techniques I used to design control-ctrcuttry. Sometimes, too. my company 
would sponsor a series for groups of engineers from other companies, with the added benefit of 
workshop sessions, where the "students" would construct loglc-clrcults to test out their designs. 
About 1 1 years ago, having worked for other companies In between whiles, I decided to go 
Independent and form my own company. So here I am! 

Let me ask you a favour here. Please don't ask me to get Involved in any massive project you'll 
undertake to tiy out your new-found skills! Believe me, I already have more than enough things 
I'd like to do to keep me occupied for the next few years, and I don't wish to appear a meanle by 
having to say NO. Thanks! 

TEST TWO 

1. Write both the "dual" and the "complement" of the following expressions : 
(a] afb + c") Co) (a + b)(c' + dl (c) ab' + c'd 

2. Simplify the following networks, indicating all steps taken, and draw the resultant 
networks : 



-|£ — (£_ 



— lj2_ufc_j|S. 






— i f' ll c 



(b) 



h H tr , 'rr o: M 



Ht= r 






H^ 



HIS 



0*H 



M> 



3. Simplify the following expressions, indicating all steps taken, and draw both the Initial 
and final networks for comparison : 



(a) L3 - x + y + y" 

<b) Y2 - a + bb' 

(c) Yl - (a + b + cMd +e) (b + c + d) (a + e) 

<d) LI - a'b'c + ab'c + a'bc 

<e) a + a'b + a'b'c + a'b'c'd + 

(f) (a + be + e) (a + be + f) 

SOME FATHERLY ADVICE 

Don't be too discouraged by the apparent complexity of some of these problems. Some of them 
are real toughiesl! Don't forget the new technique that's coming up! Work away at them, and if you 
manage to get 3 or 4 correct that's a good sign. Remember that you're new to all of this, and you're 
not going to accomplish miracles overnight. Keep plugging away, and Just as with blke-rldlng. 
you'll suddenly find that you KNOW how to do it!! Once you know the language, and your muscles 
(mental ones, that is) have got toughened up a little, this new country won't seem quite so 
frightening!! 

End of Mile 1. Wtewllll 
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EPROM Emulation for the S50 Bus 



Br 

Robert Lund 

789 Keamnge elmhurst. II. 60126 

Phone : (312)530-0957 

Day phone: (312)574-2000 ext. 688 

Have you ever had the need to develop a 
microprocessor application and found yourself 
spending more time at the EPROM burner than 
you first thought possible? Not to mention of 
course those blinding ultraviolet rays irom your 
erasei? Well, if you have, then Just possibly, 
this project is for yout 

For lack of a catchy name, lets Just call the 
device to be described an EPROM emulator. In 
theory, this device will allow the software 
developer the ability to assemble (or compile) a 
program and run It on the target microproces- 
sor system without burning an EPROM. In 
practice, this emulator consists of 4K of dual 
poited RAM. One port allows for the host com- 
puter to read and write while the other poit Is 
accessible by the target system on a read-only 
basis. In this configuration, the emulator Is 
capable of emulating In RAM either a 2716 or 
2732 EPROM. The selection between the two 
EPROM types is accomplished by a switch on 
the remote emulator "pod". 

SYSTEM DESCRIPTION - In the emulatois 
present configuration, the dual ported RAM on 
the emulator board (which resides on the host 
SS-50) begins at address $0000 and extends to 
address $OFFF. This 4K of RAM replaces the 
original 4K in the host system. Due to this re- 
placement, the host must have the capability of 
disabling the RAM that the emulator occupies. 
In general operation, the RAM on the emulator 
board appears as noimal read/write memory to 
the host and can be accessed by the host at any 
time. In the target system, the RAM on the 
emulation board appears as either 2K or 4K of 
read-only memory. 

You might ask at this point; How can two 
different computer systems access the same 
memory at the same time? Well, in reality, they 
can't. The host system, which is the system that 
Is developing the software (or Is it the program- 
mer?) can access the dual ported memory at 
any time It pleases. The target system can only 
access the RAM when the host isn't. Oh yes. 



conflicts are possible. If both the host and the 
target are contending for the same memory at 
the same time, someone has to loose. The looser 
of course is the target microprocessor system. 
The obvious result In this design Is the fact that 
the target system will go crazy unless It is held 
In some form of known state. The best resolve to 
the problem Is to hold the taiget system In a 
reset mode until the emulation RAM Is loaded 
(we'll get to this shoitly). 

In all but the most obscure situations, both 
the operating system and any assembler will be 
off and in control In higher memory locations. 
In this situation, the taiget system will have full 
read-only access with no possible contention. 

CIRCUIT DESCRIPTION - If I have main- 
tained your Interest so far, you may have no- 
ticed that the actual hardware concepts for the 
emulator are quite straight foiward. Thexe are 
no hard- to -find components and all bus timing 
signals are well within system tolerances. 

The complete EPROM emulator consists of 
four circuit functions: Bus interfaces to the SS- 
50 bus. 4K of low power RAM . data selectors/ 
multiplexers and line drivers and receivers for 
the umbilical emulation pod. As mentioned 
above, all of the components In the parts list 
can be purchased in small quantities from 
several mall order suppliers. This Includes the 
byte wide RAM parts, which by the way. have 
plummeted In cost over the last year. So much 
so in fact that a full 32K of memory can now be 
purchased on a single 28 pin part for under 
$30.00. 

Continuing with the circuit description, the 
first aspect to discuss consists of the SS-50 bus 
Interface. This Is where the emulator meets the 
host. Referring to the schematic diagram, the 
eight data lines from the host system aie buff- 
ered by IC1, a 74LS245 trt-state octal bus 
transceiver. The buffered data is then passed on 
to the two 61 16. 2K X 8 byte memory devices, 
IC4 and IC5. IC3 is an octal trl-state line driver 
which buffers the data lines towards the target 
emulation pod. This particular device provides 
data buffering in only one direction due to the 
fact that the target is only reading the data and 
not writing. 

The actual magic which is performed to 
enable the 61 16 memory devices to function as 
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dual ported RAM is piovided by the 74LS157 
quad 2-line to 1-llne data selectors/multiplex- 
ers. IC6.7.8 and IC9. These devices act In a 
single-pole-double-throw fashion to switch the 
address lines between Ihe host and target 
systems. When the host requests the memoiy 
through the "board select" line. IC6.7.8 and 9 
switch and apply the address lines from the 
host system to the memoiy devices. In addition, 
activation of the "board select" line disables 
data bus driver IC3. In effect, the memory is 
totally removed from the target system and Is 
only available to the host. When the "board 
select" line from the host system is not active, 
driver IC3 and data selectors IC6.7.8.9 are 
switched In such a manner as to allow the 
target system full read-only access to the 61 16 
memory devices. 

IC1 1.12 and IC13 on the emulation pod or 
"drive board* simply provide data and address 
line buffering between the main memoiy board 
contained In the host to the emulator pod. 

The main board and the pod are Intercon- 
nected by means of a standard 50 conductor 
ilbbon cable. This cable Is similar to the type of 
cable which Is used to connect 8 Inch disk 
dilves. The strange portion of the schematic on 
the left side of the emulation pod drawing is a 
representation of the bottom side of a standard 
ilbbon cable connector. As noted on the draw- 
ing, eveiy other line In the cable Is at ground 
potential for interline shielding. The switch 
indicated on the emulation pod drawing 
switches address line All which is required to 
differentiate between the 2716 and 2732 
EPROM types. 

The board select level Is accomplished by 4 
line to 16 line decoders. IC14 and IC15. These 
two ICs provide complete address decoding for 
the first lowest 4K of address space. My board 
takes advantage of the 20 bit DAT address 
scheme and completely decodes all 20 address 
lines. If you do not need, or can not take advan- 
tage of this addressing scheme, simply delete 
IC14 and only use pin #1 of IC15 as your board 
select. The green board select and red power 
LEDs are used simply as visual Indicators. 
Again, if you don't need them, simply delete 
them. 

CONSTRUCTION HINTS - All of the devices 
on the boaid select and memory schematics are 
contained on an SS-50 card. Although it has 
been found that SS-50 prototyping boards are 
becoming harder and harder to find . a very 
effective construction technique can be accom- 
plished by using an appropriate sized 0.1 Inch 
9 Id glass epoxy Vector board and placing a se- 
lection of 10 pin Molex connectors along one 



edge. If this technique is used, you must pro- 
vide veiy low Impedance power and ground 
lines to all of the Integrated circuits. This can be 
done by using number 14 copper wire. It Is 
suggested that the ground be placed on one 
side of the board and the power lines be placed 
on the other side. This will provide for easy 
placement of ihe necessaiy IC sockets and 
liberal placement of O.OlmF. bypass capacitors. 

As mentioned earlier, the emulation pod Is 
separated from the main memoiy board by a 
three foot long standard 50 conductor cable. Al- 
though no problems have been noticed with a 
cable of this length. It Is recommended that the 
ribbon cable be limited to no more than three 
feet. 

The emulation pod itself was constructed In a 
small black phenolic box. Enteilng at one side 
of this box is the 50 conductor extending to the 
SS-50/4K RAM board. Protruding from the 
other side of the emulation pod is a shoit (less 
than three inches) cable terminated in a DIP 
header appropriate for the 2732 EPROM. Also 
contained within the pod enclosure is the 
2716/2732 switch. 

Although my emulator was constiucted using 
the above techniques, it is woith mentioning 
possible problem areas which may crop up 
during construction and testing. First, and 
probable the most important, use heavy power 
and ground lines around the ICs. Also, use at 
least one O.OlmF. capacitor between power and 
ground at each IC. Falling to use these two 
Important suggestions will almost Insure that 
eventual problems will occur. 

A note of caution Is also required in the use 
of three terminal regulator parts. These devices 
have a nasty tendency to oscillate if Ihey are not 
bypassed well. As a general rule of thumb, use a 
0. lmf. capacitor on the input side and a 0. lmf. 
and a 30 to lOOMf. capacitor on the output side 
of the regulator. The IN4001 diode between the 
Input and output serves as a protection device. 
This diode routes the reverse potential around 
the regulator when the main power on the host 
is shut off. In effect, this prevents a reverse 
potential on the regulator between the off or 
low state power supply and the positively 
charged bypass capacitors on the board. This 
precaution will prevent a regulator from myste- 
riously dying for no known good reason. Also, 
use an adequate heat sink on this device. 

USING THE EMULATOR - Now that you 
have the emulator constructed, how do you use 
It? Well, as far as the host system Is concerned. 
Ihe emulator Is totally transparent. It acts as 
any other memoiy would In the first 4K of 
memoiy space. The real key to using the emula- 
tor for It's Intended purpose Is to move any 
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assembled or compiled code Into this 4K space 
so as to become externally accessible by the 
target system. 

Unfortunately, the above process Is easier 
said than done. Some microprocessors are 
blessed with a vast complement of relative 
addressing modes which makes them a breeze 
to program. The 6809 and the 68000 seiles are 
such devices. Other, more archaic designs must 
rely on absolute addressing modes to accom- 
plish any useful work. The absolute addressing 
modes of these older processors require that 
memoiy locations and various subroutine 
locations reside at a fixed "absolute* location. If 
they need a variable at say location $0100. it 
had better be at location $0100, or else! 

Newer processing devices have the capability 
of addressing memoiy locations using a "rela- 
tive" offset from the program counter. The result 
of this capability Is the fact that a program or 
routine can run In any memory location. 

Without going Into great detail over these two 
concepts, save It to say that when the EPROM 
emulator Is used with a microprocessor that 
requires any absolute memory locations, a form 
of gymnastics must be applied to the final emu- 
lated code. 

As you may have already guessed, the emu- 
lator memory resides at address space $0000 
to $OFFF in the host's address space. This 
address space may be totally different from the 
address space occupied or expected by the 
target system. As an example, if you were 
developing a software project for say a 6802 
microprocessor, the target would expect to see 
EPROM containing reset and interrupt vectors 
at $FFF8 to $FFFF. This is drastically different 
from the emulator address space from $0000 to 
$OFFF. 

The difficulty results from the fact that 
attempts by the targeted microprocessor to 
execute an absolutely addressed memoiy loca- 
tion will not be correct. As an example, the reset 
vector on the 6802 is located at $FFFE in It's 
memoiy space, not $07FE as would be the case 
in the emulator/host address space. As such, 
one must compensate In some way for any 
absolute memoiy locations. This can be accom- 
plished In an assembly code program by setting 
the program's "origin" at $0000 and then 
telling the assembler to add an offset to any 
absolute memoiy references. This can be done 
by adding an additional offset to any absolute 
memoiy referenced Instruction similar to this: 
JMP LABEL would be changed to JMP 
LABELf $F800. Once the offsets are added to all 
absolute references, the addressing scheme will 
be correct for the taiget system. To visualize 



this concept, refer to the following code frag- 
ment in Fig. 1: 



TTL FIG1.ASM 
PAG 



* Offsets and code fragnent illustrating 

* operation for a 2716 EPROM. 

ORG $0000 TARGET'S LOW RAH MEMORY 
TEMP RHB 1 



* Actual program starts here. Although it * 

* appears to start at $0000. the target will • 

* see it beginning at SFBDO. Consequently, all* 

* absolute iremory references must include an * 

* offset addition of SFBOO. * 

* » 

* The above addresses starting at $0000 are OK* 

* The target will see them as low RAM. * 

* » 

* Any absolute addressing in the body of the * 

* following code MUST have $F800 added! • 

ORG $0000 
START LDAA ISFF 
STAA TEMP OK HERE. OUT OF EPROM RANGE 
CHPA i$01 

BNE START OK HERE. ADDRESS IS RELATIVE 
JMP START+SFBOO OFFSET MUST BE ADDED, IS 
ABSOLUTE ! 



* Interrupt and reset vectors * 

ORG $07FB 
DtO FOB START-»$F800 
SMI FOB START+SF800 
NMI FOB START+SF800 
RES FOB STARTt$F800 

END START 

From the above example, once ihe program is 
assembled and moved Into the host's memoiy 
starting at $0000, all of the absolute memoiy 
references will be correct for access and 
operation on the target microprocessor system. 

From the above assembler listing, note that 
the oiigin has been set to $0000. If this con- 
script is followed, the final assembled .BIN file 
will be loaded at $0000 when using the FLEX 
"GET" utility. 

One of the interesting capabilities of the 
emulator Is the ability to change memory con- 
stants in a target system on-the-fly without 
reassembling the whole program. Remember the 
last time you tried to tailor that timing loop 
with Just the light constant? Now, by using the 
emulator. It's a simple matter of accessing the 
constant's location with the host, inserting a 
new constant and running the target system. 
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m CONCLUSION - At this point In Urae. no 
printed circuit board has been produced for this 
project. The emulator was originally designed to 
be a single device, if there are any ambitious 
Individuals In the audience who would like to 
paitake in board design, be my guest. PC board 
design Is ceitalnly not my cup of tea. 

I hope this project Is as exciting to you as It 



has been for me. Once you start using this 
device, you will quickly find as I did that It Is 
hard to live without. 

As a final note, 1 will answer any questions 
you may have in regards to this project If you 
send a postage paid return envelope. Good luck. 

tj 
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Mac-Watch 



A REVIEW OF DOUG CLAPFS 
WORD TOOLS 

B^ Ed Law 

1606 Rock BMtRoad 

MixMn, TN 37343 



After considerable delay and several false 
starts. Doug Clapp's "Word Tools'has been dis- 
tributed and is on dealers' shelves. According to 
the distributor. Aegis Development. "... Word 
Tools has been desired to help you write better: 
to catch mistakes, to suggest better ways to write 
things, and to encourage you to think about your 
writing." Let's see how well those objectives are 
achieved. 

Word Tools provides for opening the text docu- 
ment to be analyzed using standard Mac proto- 
cols. Word Tools then performs four functions. It 
counts, sorts, analyzes, and suggests ways to im- 
prove text. 

T Minus Ten and Counting 

Selecting COUNT under the OPTION menu al- 
lows the counting function to be customized. You 
may get a count of characteis. invisible charac- 
ters, spaces, words, articles, prepositions, proper 
nouns, and paragraphs. Alternately, you may 
eliminate those Items that do not Interest you. 
After OPTIONS have been addressed to your lik- 
ing, the count is begun by selecting Count Docu- 
ments In the WORDS menu or by clicking the 
count button. If the document being counted Is In 
MacWttte format, get set for a long wait. Docu- 
mentation with Word Tools quickly admits that 
MacWrlte documents are read slower than ASCII 
or Word files. If your documents are prepared 
with MacWrtte and you don't have time to spare. 



save your documents In ASCII format and the 
problem largely goes away. This 1200 word re- 
view took nearly 3 minutes to read while In 
McWrtte format and only 20 seconds to read when 
saved in ASCII FORMAT. 

Upon completion of the counting process, the 
RESULTS window shows not only the number of 
hits for each item being counted, but also infor- 
mation about averages and extremes. The 
"Averages'sectlon of the window shows the aver- 
age characters per word: words, prepositions, and 
articles per sentence: and sentences per para- 
graph. The "Extremes"section shows the maxi- 
mum characteis per word, words per sentence, 
and sentences per paragraph. 

When RANKINGS is selected from the windows 
menu, five bar charts are calculated from the 
count results and show in the graphic form the 
documents relative complexity, readability, and 
interest level. These charts show the relative 
grade level at which the matertal Is written and 
Its relative word, paragraph, and sentence 
length. There is no explanation in the users 
guide about what these chaits mean or how they 
should be used. Also, the program apparently 
makes no provision for printing these chaits in 
the "Word Tool Report." 

The EXTREMES window shows the longest 
paragraphs and longest sentences. (The OP- 
TIONS menu allows you to set how many such 
extremes will be recorded.) As you review each 
extreme. Word Tools allows you to mark It for 
future correction or ignore it and move on to the 
next extreme. This is a useful feature to those 
who tend toward run-on sentences or para- 
graphs. 
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Sorting and Listing Words 



Printing Reports 



As Word Tools counts a document. It produces 
a list of all words used In that document. The 
SORT OPTIONS window under the OPTIONS 
menu allows the words to be sorted alphabeti- 
cally, by word length, or by the number of times 
the woid was used. The direction of sorts may be 
ascending or descending. The resulting tests can 
be viewed on the screen, printed out In a Word 
Tools Report, or saved as a separate file. This 
feature can be used to look for overworked words 
or to Identify overly-complex words that need to 
be replaced. 

Checking Style and Punctuation 

One of the major functions of Word Tools is to 
check for apparent errors in style and punctua- 
tion. Since what Is right or wrong for a particu- 
lar usage is highly dependent on the context. 
Word Tools calls its findings "suspects'rather 
than errors. 

For example, the Internal style suspect list 
warns against using the word "girl* as being po- 
tentially olfenslve. When used in children's lit- 
erature, however, lis use would be entirely ap- 
propriate. The Importance of this principle can- 
not be overstated. In a variety of documents 
checked with Word Tools from excerpts from 
children's books to technical software reviews. 
40-peicent of the punctuation suspects and 60- 
percent of the style suspects were ultimately de- 
termined to be satisfactory with no changes 
needed. 

The accuracy of the checking process can be 
Improved by creating your own suspect lists. 
Word Tools allows you to create as many as you 
like. Lists may be customized to contain only 
the types of errors expected depending on the ap- 
plication. For example, a newsman's style sus- 
pect list might highlight "Russla'as being an un- 
acceptable reference to the USSR. 

When Word Tool Is used to check style and 
punctuation, the resulting suspects may be either 
Ignored or changed. If the suspect Is to be 
changed, the suggestions provided by the suspect 
list may be used or an alternative approach tak- 
en. If the suspect lists' suggestion is to be taken. It 
can be used to change the specific suspect high- 
lighted or gobally change all occurrences of that 
suspect in the document. This global change fea- 
ture may be used as a glossary function. Short 
codes would be typed whenever long repetitive 
terms wee to be vised. These codes would then be 
entered in a suspect list. Word Tool could then 
quickly find and replace all such codes with the 
full term. 



FOR THOSE WH 



Word Tools can print simple reports showing 
the results of the word count and the word list. 
The word list may be sorted In several orders be- 
fore printing. Unfortunately, the word list print- 
out does not Include the frequency of occurrence 
of each word as Is shown on the screen. The ex- 
cepting lists, ranking bar charts, and other fea- 
tures of Word Tool apparently cannot be printed 
in this report. 

Equipment Requirements 

Word Tools works with any Macintosh with at 
least 5 12k. Two disk drives are highly recom- 
mended. It is not copy protected. 

Word Tools Users Guide 

The users guide for Word Tools Is complete and 
clearly presented. The Ranking section could 
have contained more explanation about the 
meaning of the bar charts and how the ranking 
of a document can be Improved. Overall, the users 
guide was adequate. 

Overall Assessment 

Overall, the value to Word Tools to the ordi- 
nary Mac user is limited. It does provide Interest- 
ing statistics about documents which will be of 
use to linguists and perhaps to professional writ- 
ers. Its utility would have been greatly Increased 
if it were Included In a broader scope program In- 
cluding a high quality spelling checker. The 
Ranking feature would be more useful if addi- 
tional rationale were given on how documents 
are rated as to "interest level'or "grade level." 
The high number of suspects highlighted in error 
will quickly discourage many users. 

EOF 
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or 
Things you won't find in the documentation 

Copyright 1986 by 

R. Jones. Micronics Research Corp., 

33383 Lynn Avenue, Abbotsford. 

British Columbia. CANADA V2S 1E2 

& Computer Publishing, Inc. (CPI) e 1987 

The material in this article is copyrighted by Micronics Research Corp. & Computer Publishing, Inc. (CPI), 
and reproduction, in whole or in part, by any means it prohibited without the express written permission of the 
author and CPI. 

And More Ways to Speed & Shorten Programs 

Let's start small with Example 1, and work our way up to the not-so-obvious, of which 
instances appear in all kinds of programs, so consider then : 

100 IFX% = 1THENY%= 1 
110 IFX% = 2THENY% = 2 



190 IF X% = 10 THEN Y% = 10 
200 rest of program 

I think almost everyone will see my point here, namely that a lot of program-space is eaten up 
and a lot of time wasted going through all those IF-THENs, every one of which has to be 
interpreted in turn before Line 200 is reached. I've even seen instances where the author of the 
program has b#en aware of the time wasted, and decided to make the program execute faster by 
tacking the statement ': GOTO 200' on to the end of every line except Line 190. In spite of this, of 
course, it still means that the time wasted is proportional to the value of 'X%', as it would still have 
to scan all the way through to line 190 if X% were equal to 10. 

How much tidier and faster-to-execute if we simply wrote : 

100Y% = X% 
200 rest of program 

which achieves exactly the same thing in a lot less space, and doesn't have to spend time 
evaluating even one solitary IF-THEN. 

All agreed? OK then, let's move on to a much more frequently occurring pattern : 

100 IF X% = 1 THEN Y% = 17: GOTO 200 
110 IF X% = 2 THEN Y% = 20: GOTO 200 
120 IF X% = 3 THEN Y% = 23: GOTO 200 



190 IF X% = 10 THEN Y% = 44 
200 rest of program 
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I should mention that sometimes it might appear in the form 'Y%=17*Z%', 'Y%=20*Z%\ 
etc, but the underlying principle is the same. The main thing to observe is that each time 'X%* 
increases by 1 then the value associated with Y% increases by 3, ie a ratio of 3:1. This gives us the 
clue that in some way 'X% * 3' comes into the picture. Let's apply this line of thought to Line 
100, wheie X% = 1 and therefore X% * 3 = 3. Surely this Line could be re-written as : 

100 Y% = 14 + X% * 3 : GOTO 200 

with no difference in the result as far as Line 100 alone is concerned. '14' is, of course, the 
base-constant necessary to make Y% evaluate to 17. Aha! And what's this we find? Nothing less 
than that our new Line 100 also evaluates correctly for the remaining lines through to Line 190, 
thus eliminating the need for lines 1 10 - 190, and also the 'GOTO 200' on the end of Line 100. 
And so our program ieduces to a mere : 

100 Y% = 14 + X%*3 
200 rest of program 

Maybe this is so obvious that you are wondering (yawn) why I'm botheiing to raise the subject 
at all, but, believe me, I've seen this very thing so often that I'm convinced some things become 
obvious only when they're pointed out. So ... let's move on to example 3 : 

100 IF X% = 1 THEN Y% = 44: GOTO 200 
110 IF X% = 2 THEN Y% = 41 : GOTO 200 
120 IF X% = 3 THEN Y% = 38: GOTO 200 

190 IF X% = 10 THEN Y% = 17 
200 rest of program 

Now what do we do? We observe that each time X% increases by 1 then Y% decreases by 3. 
In this instance although the foimula : 

Y%=41 +X%*3 

holds for Line 100, it certainly doesn't hold for the remaining lines. This too is a very 
common situation, and one solution is first of all to reverse the expressions for Y% from top to 
bottom, thus re-creating the situation in example 2. After deriving our formula 'Y%=14+X%*3' 
for the revised set of lines, we are ready for our second obseivation, namely that in any line the 
original value for Y% and the revised value for Y% add up to 61. Thus the oiiginal 'Y%=44' got 
transformed into 'Y% = 17', where 44+17=61; the original 'Y%=41' got transformed into 
'Y%=20\ again adding up to 61, and so on through to Line 190. Another way of saying this is 
that if we subtract our transformed value from 61, we'll produce the original value. And so our 
formula 'Y%=14+X%*3' now becomes : 

100 Y%=61-(14 + X%*3) 

or 
100 Y% = 61 - 14 3-X%*3 

and finally 
100 Y% = 47-X%*3 



Hey, that's fantastic, as our program can now be reduced to a mere 



100 Y%=47-X%*3 
200 rest of program 

But there's a shorter and more direct way to arrive at our final formula! Can you see it? 
Should I give it to you right now, or wait till next time to give you a chance to figure it out? OK, 
you've convinced me! Here's how. 
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Based on our observation that Y% decreases by 3 each time X% increases by 1, let's force a 
decrease by implementing '-X%*3' instead of '+X%*3', as we did when Y% increased 
proportionately. Now, let's lake a look at Line 100, and see how we can force it to assign the 
value 44 to Y%, given (-X%*3) which, for this line, equates to -3. Obviously we need the formula 
Y% = 47 - X% * 3' (for Line 100, this is equivalent to 47 - 3, or 44), and lo and behold! the 
formula holds true for the remaining lines. 

If the relationship between one line and its successor doesn't follow a particular pattern, I 
wouldn't waste time trying to find a reduced program-segment. However, segments of the 
following form, although the relationship is non-linear, are amenable to solution as there is a 
pattern of sorts between successive lines. See if you can find a suitable formula! 

100 IF X% = 1 THEN Y% = 21: GOTO 200 
1 10 IF X% = 2 THEN Y% = 24: GOTO 200 
120 IF X% = 3 THEN Y% = 28: GOTO 200 
130 IF X% = 4 THEN Y% = 33: GOTO 200 



190 IF X% = 10 THEN Y% = 84 
200 rest of program 

Notice that the increment between successive lines isn't constant here, but itself increases by 1 
each time. That is, the first increment is 3, the second 4, the third 5, and so on. I'm going to warn 
you that this one isn't so simple, but, for what it's worth, the solution is given a little further on. 
Don't peek till you've had a go at it first! ! 

Now I'm going to give another example, and jump straight through to the solution, leaving you 
to verify that in fact the greatly shortened program-segment is truly equivalent to the original. Here 
it is : 

100 IF X% = 1 THEN Y% = Y%+19*Z%: Z% = Z%+55: GOSUB 1000: GOTO 200 
1 10 IF X% = 2 THEN Y% = Y%+26*Z%: Z% = Z%+51: GOSUB 2000: GOTO 200 
120 IF X% = 3 THEN Y% = Y%+33*Z%: Z% = Z%+47: GOSUB 3000: GOTO 200 

and so on down to 
190 IF X% = 10 THEN Y% = Y%+82*Z%: Z% = Z%+19: GOSUB 10000 
200 rest of program 

That's some program! But, using our new technique, it all boils down to : 

100 Y%=Y% + (12 + 7 * X%) * Z%: Z% = Z% + 59 - 4 * X% 

190 ON X% GOSUB 1000,2000,3000 10000 

200 rest of program 

Notice how we adapt to the fact that each line goes to a different subroutine before popping 
down to Line 200, by using ON - GOSUB. It's lines such as Line 190, where I've sometimes had 
as many as 40 or more addresses to which to 'GOSUB', that make me seriously consider adding a 
computed GOTO/GOSUB* feature to my new RBASIC. In such an event the GOSUB address 
would be computed before being executed and the program would reduce further to : 

100 Y%=Y%+(12+X%*7)*Z%: Z%=Z%+59-X%*4: GOSUB 1000*X% 
200 rest of program 

Sure would be nice! 

Before I finally say goodbye here are a couple more tips for shortening and speeding-up : 

1. Very often you'll find a subroutine which is called only once. Maybe it was originally 
called more often, but the author will have cleaned up his program, and forgotten to carry out such 
a check. All you have to do is to make the code 'in-line', and delete the GOSUB call. 
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2. Even more often you'll find a piogram line ending with 'GOSUB xxxx: RETURN', or 
maybe the RETURN is on the following line. In the first case, the 'GOSUB xxxx: RETURN' can 
be reduced to 'GOTO xxxx', and in the second the final 'GOSUB xxxx" can be replaced by 
"GOTO xxxx'. As far as the next line's 'RETURN' is concerned, it may safely be deleted only if 
ihere is no other call to this line. 

SOLUTION TO ABOVE PROGRAM REDUCTION PROBLEM 

Hope you didn't peek before having a really good go at it, but here's the solution to our "little" 
problem above : 

100 Y% = 18 + (X%+ l)*(X% + 2)/2 
200 rest of program 

How did I arrive at that? You may very well ask. I^t's just say I enjoy mathematical problems 
of this kind. But, to get you pointed in the right direction, I arrived at a base of 18 by concluding 
that if X% could have taken on values below the T in Line 100, the program would surely have 
looked like this : 

80 IF X% = -1 THEN Y% = 18 
90 IF X% = THEN Y% = 19 

thus preserving the pattern of increments. That is, first an increment of 1 to move from 1 8 to 
19, then an increment of 2 to go to 21, the first line of our actual program. After that, the rest 
wasn't too difficult - - comparatively speaking, that is! 

First, I subtracted 18 from all values of Y%, including those in my dummy lines, and set the 
result out in a row, so : 

N 0123 456789... 

Y% 1 3 6 10 15 21 28 36 45 ... 

where 'N' is Y%'s position in the series. I immediately recognised this series for Y% as being 
an arithmetical progression with Y% being the sum of any 'N' terms. That is, for example, where 
N=4 the '10' immediately below it is the sum of all Ns up to that point. The formula for computing 
such a sum is : 

(First N + Current N) * (Number of terms) / 2 

In this case, 'first N' is 0, and can be ignored, and "Number of terms' at any point is one more 
than N at that point. That is, '4' is actually the 5th term in the series of Ns, and so on. So our 
formula now becomes : 

N*(N+ l)/2 

Check it out and verify it. 

Now, below this series I put the corresponding values for X%, commencing at '-1' below the 
'0's, thus : 

NO 12 34 5 67 8 9... 

X%-1 1 2 3 4 5 6 7 8... 

and immediately noticed that 'N' is equal to 'X% + 1', which I substituted in the formula 
immediately above to give : 

(X% + l)»(X% + 2)/2 

Of course, I also had to add in the 18 which I'd earlier removed, and that, believe it or not, is 
how I got my final formula. To be Continued Next Month 
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Pnilipe announced lb* 03-9 Opcrntiog Syatcm oi tb* baaia forComflect 
Diae.]ot«r»ctiv«<CD-[> New Madia techno] of J. Microwar* offices arc located L& 
Dee Main**, Iowa. Santa Clara. California and Tokyo. Japnn with field 
repreaeouUve* worldwide 

ELECTRONIC MAIL NOW AVAILABLE 

Dee Moln*e, lewe — Hlcrowara lyataeu Corporation, an internationally 
t«cOO,nls*d plonaer In aicroo^nj t*r ayatcai eoCtware d*v*lojn«ni . 
■Boounca* th* availability of an llectroolc Hail eoeaeun Lcationa prograa 
Cor aultl-noda netvorka and development ayetaaa. 

Kail ta a *cr**n- or 1 ine-or lented utility epeclficelly daaiined for 
Nlcrov<[i*i popular 08-4768000 09«ratlna syaten. *m i l v*«* your 
favorite OS-f editor luKACa, SCflXS. ite.) to create or ■oo'lfy mh^ii, 
K*il Featuraa dlatribvted »alllrg liata (entire group* Acceeaad at one 
r. i«e i or cq nee cut lua mailing liata Kroai teralnnl to to retina 11. 
nailing tlata can aiao ba defined in teraui ot other Liata. 

Received anil cm b« aent directly to * printer device far lenadiet* 
printout, apooiad an aulttueer ayateaa or aawed ta a Ilia. «Ui] 
featurae on-tln* help and caoplet*. •«ey-tO'und*r»tand docuaenretl on . 

08-4. merovatt'a CLa^emp product, la a mS~t|ati aultl-ua«r and 
oult l-taaklng opotatlng ayatea for cowpotera (Meed on. tn* MOtoroU 
(■■Lly of taxxx proc*a*orf. OE-* la coaoict, AQKabl* and proeldaa * 
UNIX<a ryle *nvlrana*nt far epplicatlon aof tw*r*- Sloe* it* Lnt reduction 
In 1963* 08-9/69000 nil been licenaed to over ISO aanuf ectyrere world- 
wide Car uif In * variety at Indultrial, acientlftc and camuair 
produce*. 

founded in 1917. Micro**!** fiy*t*« Corporation ap*ci*li<e* in th* 
developeient of advanced operating tyicrai and proqreaailnQ laoguagea. 
Last year Bony and Philip* announced trte OS-9 Opetatine 5y*t*a as th* 

basis far <qap*ct DieC- Interact tv* , :.T - 1 ) N*w Nndl* technology. 
Mlcroware office* are located in Q«a Moln**. low* and Tokyo, Japan with 
field representat iveo worldwide- 
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MOTOROLA DISCONTINUES THE MC3B70 
AND MC6S0ST2 MICROCOMPUTERS 



Aullln. Texee, July 13. IIJ87... Motorola's Microprocessor Producli 
Group la discontinuing Ihe manufacture or ill packaged versions of (ho 
following perls: MC3B70 ind MC6B09T2. Tin davlcai will bl available 
for lifetime buya Tor A period ol alx (ft) monlha following Ihlf 
announcement data with dallvary oeheduled no more lhan eighteen {IB) 
monlha from Ihla fnnouncamanl data 

Ths -;3870 fs A tirKjuj-cMp B-bn ms^PcempuleF ulHi&ng N.cnannet technology The 
pert ft vailable lor lht» iilatime boy IA a 40 pin Cerd.p and a 40 pm pfaslc DIP 

The MCt 1ST: Moocompuier umi (MCU) with PLL tag< it a member ol Ifw ME805 
Family of iKjle-chip rmcroejompulonj Fur 1Mb. i.lat.ma buy tie MC6305T2 ts only 
available in 28plr> piailic DIP. 

for mora infor lAlon cenlacl your local Motorola Sales Ollice or Aulhoriied Moloiolai 
Oismbuior 
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MOTOROLA INTRODUCES KtCH PERFORMANCE 
ECL ARRAY WITH IK RAM 

PriPAAIa. Arizona. Juno 30. »»« tAotoroie announces the MCA I MOM, 
Ifw* In a aerlea ol ultra Mgiv^T m mam ECt bipolar arraye built with 
Molorola'a filgh-denally. dalde-leoteled MOSAIC II" process. The 
MCAlSCOei array eontakie ogle pnvolom 1500 ■qutveJeM 300 pico- 
second getaa plus 1 152 brie al 3.S n a coring uteble RAM orgenlied In lour 
bloEAs of 32 1 f. Prvavflnwd rnemevy rsorvAou rsuone Allow either elngte 
pon or duel port eperenon (eee tAbta below). The routing IWilutlly end 
mecrDOAll alruclurwa are devrgned ror neat generation high technology 
■y al am epplieetJon e. 
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i^pfcjj'tfcliJijpVtilN*) flAM guaMy nlii3Bnd>»^ Tha 

■r*y atoe tmiurv two vi*n *roe* orrwotori to i*np> ry cmk«i «**mo> v Gnvru *no to o»x>rov» 

aVpttptfrWCB 

Ttm UCAiSOOM &u* OB*« kiM >+ n \ cycta bam tftom davgn -fun io •n-frrwn. of fuUy MiMd 
OrtKfypaaJ a Mven MnMhs P*. Typical nftvn-a«tTno tngn-**^ cAtvgo « U0K «or it«ac-. 
(*— *gm or »37K Pw • airgp* dMipa *v*i«0-i m A 14» pin gn« ttriy lutf^ irw MCA.S00M m 

$1»S»i IK cjuAnWifi 4tnd S2*0 -*i 100 »j-v*t»#t PndngmnUS [ULvilurUS wtotvwynn,f 

Far ran miorrnllurt. cprtacl yqu>t be* MotOfOla Sl-H Ottk» W Aunvind blolrjTOtfl r>>tr«uici>r 
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f**1 Utviw CHi jji>] Ouqm C*" [T] tux* C#a fJTj »ijt tj«Mn [w] wmt *■"**# 0** 

BASIC MCA1500M ARRAV FEAT1/RES 

• -^Vrrt*re* **tr» WECt IOKIOKh* ECU 'CW LO^ F#^t»**i 

• LD0»c Function Sccntoo by U»*r 

• MOW* lAjtsk PR^v^-atjAv {UlrH U»W»« rTUttkS) 

• UP lo 1790 Ecturvtriarrl loq-c Gales Pit* foot Stocka o( 32 ^ <1 152 Stt) 
Um' Cor^rADtt HAM 

• Or»<nip RAM T«i C-^Mt-f 

• triarru) Gat© MUTys — fl 30 oi fyp 
■ Ouvui GdU Oivy* — 7$ m irP 

• 32 k S RAM Oatay- — tAA 3 5 n» ryp 

• SiApoottM dv Co*»\>*-i# CAD Otsritu^ejart 9yV>*m 

• Pown OfnjpaTiMAT. —BO VtftRft fyp 

• r«o S**- T-^-KJ Writs Smite Ger***&** 

• Ha-peoQod AfTi/ PAV^a*)* 

• 191 Tout Cam wfffi izo tyutouvtrt Parts 

• "Ajoi C*0*W— l>^ io "l 25 oi »YP (0 35 io 1 77 mail dmpm*m> an *S# ****** 

• Ojvm C«H r>t*p — o 5 to i fl m typ io 8& to i 5 ne ma*) dBvervsrvj on Ogic fuf*cflar< 

• RAM Arfit*nKB AossB T*m* _ 3 5 roj fyp {5 man] 

• HtoA* n *P^«no*- PLvaDwBmamortvsHti&AtfCB&meSionaiPit* 

• Up to ftt Total CXnpsA o* wheft •« »o » Can Otvo 25-ahm Ld*mU (u- outjarts. can dHva 
50-ot*-^ioaoa) 

a CXAVul Edga Spaad _ 1 rt| tye 20 to 60% 10 * ni mm 20 ko B0% grOenrW «mW 
•doa nw tto* down ocwon} 

• Arr»i*art rfMnporrtito Hargn fwrth naat «tnk. «nt) 750 Kpm a*) — to 7CC 
« Ttrhpfrfanri Covffioam •■ 3 3WV ryp w«r Haat Smk ■«) 750 "pm at* (Vw 

• Woftaga Caft^wwi** ad — Vgc - * 2 to 5 ** Voaa 



1. R CtM an> tjv» -xi-tw. ot njQjc*-l 32 x RAM Caaa 
2 M Gatk ara cha rwtm at n*»mm1 M M*t7no-n* 
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12 x i2-err ccl multvuer circuits 

SPEED UP tJVTMtnmC OPERATIONS 

taA Maam. nay Jo. iw lUnii ui p ■) m* uciMoi 

■ olOi l J-*« n ' " Up n— it imaspltv ckmsp lnt_KM tot 

) «M»«|>V 
I CCL IMMMM^I , ths soiioavac 

k." a XttnM V + * * 

S-W-1 (VOM ol «** r # *aaDn nodM *r* ■ 

• ta^rfnghyu 1 J* 2| (WWr^rt ruTttM trad* | 2* W 7» C 

• Wka*>y«*g MO 12-M ^wp^O uj*I nwnOv* produca*. a 2a-M • 




Hw UO&AT N la JWa B y j DM) innM nuMH IMWM ■ »uww o* **** **) afJOXW* 

■mm SsActfr 
« Th« 0*0*1* on b* uMd «n array*, to pg*fc>m largat nHj0,ipacabona Arty runM ol brt» can 
to muft|A«J by o*ng mutapte part* m an a/r«y coN*>^aaan Tha ru***** p* oaffe igqwad 
lor «sp*«Md input*, t^rtf*** wtj* 0* raaufcny fie^gui£*u»i (*** «* fl"*"" •» Pw fcataavaj 



Tfcn»j<n*) 




i mm tw dc mm* * ** ** o* r* UECL iOkh Urnr* q 
f MKl lar**** A **o» ECt 10QK i 



Th# ova* ihmw cvem.io 

MC 10861 wwof 
* t*0c* to CO flay* 



pacUo*» m • T4»0<i Or«J «n*v P-^fcAOa, and P«o*C kf 
un * tatad bato* « VJ S cotarntof US 



MCiOBftlR I3TVI0KH 

MC10L9S1R lOKilOKH 
MC10DK1R 10 
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NV n 45V0C S 03VOC 
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2S0 00 100 



For hjr*itHr *ntorma*on coniaci *ou* toctf Woforqu) 5*ta* Ottic* or Auffvind Metcma 0wf<xilor 



OQrilMlC EVANS INDUSTRIES 

CD«\ETE Mac CuV**jTEN rOMTS ON A 9.79 INCH OTSK Ml^ 

Dominic Evan* InrJuitntt mnaunctt i<nr>tdt«ta 4v«llibllilv at 
tn« 0E lABK *tacfc inq t«ia-bo4rrJ tonou tar *y»t*a. 

Th* *y*t*#> 4* a |m*d «t Ulfri rJlvtlODing yar y Mgh 

par 'oraanc* ay a f a in apol icetion* lucti *« ]ndu»tr la I 

Con trot « Data Logging and High Rtio lution Graphic a Syitam . 

Baaad on a ! 2r1H* 4B00B or 6BB13 32-Bit HlCr OPrOc Mior, and 
not rlQu 1*' log an tipmi ivt hat k pi ana. tnt *y *t«* •« far * Mqrt 
pfriorauncf at lo> catt. 

Th* OEIfrBK i» (uppllld Ml th 9l?KBvt* a* on mod /COO Ua ( 1 - 
STATE CMOS 5TATIC RAH. I»tl*d into Bat * »r V-flac k*d 32-0m 
JEDFC nfiorv titit. which Mill alto- ?.0HByt** Ol RAM to be 

I i t t»d Mh*n 1/1 Bi I dwit** bvc 0*0 aw j i I *bl • . 

Intarlaca* tnclod* a Fully Arbitrating |nj tn tor / larqa i *»C6t 
Control If whlth can fupPDrt i»ulti(>lf Hard Dl»* Driwaa. liDf 
Et<-t4i»/-i, CD-fl0M« ate., and a Fla-ibla Di«c Cooirol If 
tuppor t ing uotfl 4 our InBy ta Dr ivii , togatrar Mith lour RS737 
Sarial porta, or t»ir»» NS712 Sarial porta aiv) o*ia rr54fl*5 
Svnl por" t for Ntl WORK I HO at data rata* ol 25BKBi tasSat . 

Qtrar faaturaa mclud* a Battary Oackad . flul ti«« 

Clcc k/Calartdar . lour Para Mat oortt mi i h a Lant ronic* 

intar'aca and Bum Bui *9r mg/Oacoda to tuppor t addi 1 1 on a 1 

■ ticking boar- da ■ «mchi mdudf a Vary High Pmr loramct 
Oriphlci Sy» taa Mith Hatn* Co orrxntor , 

Otl-HUC**:. an flenuvt ROM B*»»d OCAUC H0KI10R t% which a* 
ava i labia . proy Ida* lac 1 1 1 1 if* to Up Id ad/ Do«m load Ho tor o I a 
S'Faraa t Binary lilaa bat -am Hpat and Targa t tyttixi, 

togatnar mth Di*k Ooar-ating BpotilriO* and OiaQnoatica. 

A lully co/i( igurvd opar a t ihg ivitin Mlth Natly* A**aabl W , 

C-L an guaga Coaoi I •*• and Sc r#an Editor proy Ida a a coaplata 
davalo o aan t mvironajni lor'6B4JO0 «y«taa>*. 

A urn^ui frS99~p~L£x Si anil a tor a I Inn uaara, to run ih*jr 
• lifting library ol El-tiit FLFX iol tM' a, and to dtvtla* nm* 
6BB9 ipttMin in ^n anhancad mvironmiinl , 

Th* nDSfcSK t>0ttx DavalopAant uorv Station incD*po P ata* (. ha 
0€ laBK T mo- Board Coaputar Syataa tooathar Mitn o.a or l-o 
Ittflytv Fla-tbla Da«l> Dnv#» and an optional 75,t)*tBrta> Hard 
Ol«k O'lvt. Th* lyitm 1« lully fnc I oaad in a roptjit ataa I 
anc loiuri Mith a loot print aliqhtly t*rqmr than a 9.73 inch 
d I *«. dr i vi . 



COHjnrTF nflfW BiTOfU COMPUTI ft tVBTEH IJW A IINBU I iJWfKftHU 

0oa>in ic Evan* Indu^l r iff anocMnte*, tfMdl at* availJibltty of 
th* 0C1OO Single Board fcaputf and tN- nOOf>v Miti'oo'Ot aaaor 
Oevalaffeent $v«tfn, 

T ha ay a t«m* irp a i«M a t uaaf « de-valop mg mduatr i «l tdntrol 
lyitfnt or uaara raOul r I ng a uanar a 1 Purpaie high e*r Iprnanc* 
coaopu tar * oc at. im 1 1 1 ic and r*gaarcn jppl Icat ion*. 

Ba**d on a 7n>*t &8V7 aic rap roc itior , th* 5mg|* Board 
Coaoulfr laaturv* upto BMByt** ol tPRQM , t-O 78 pin RArl/ROM 
aoc.ata Mlth baKBytf* ol NON -VOLaT JCE RAM. « Flr.ibl* Dial 
Control lar *uopor t mg uoto lour 1 nBy t* dr i «** , t*#o R6^32 
Sir i a 1 port* Mith indapandan 1 1 y prograaxaab la baud rata* uoto 
3B4BBBaud ■ two Pa rail*) part* Mith tno I 6- b i t Court tar / T lain , 
Centron ic* Intarlac* and connit tar* 4 or a aul ti- I in* LCD 
module and paralla] kayboard. 

Oth*r l*a tur ** a 1 *o o* l*r*d a* • t an d«rd . *rm a Batt*r y Bach ad 
Rul-fiM Ctock/Calaodar . *na a Sy*t*>*> watchdog Tiatr. 

Th* board oooratv* <ro« a S I NOl € mvequlitid 0C aupply, u*lng 
on - hoard r aqu lllton I or *V*t*m pow»r , and a DC-OC convirtir 
lor rvliabla */» I ?Vo I t RSV32 aparation. 

To pro vi da th* hiqr>a*t r»l uhility, all dfvtrei %r * uun tad 
in Go Id Turnad-P in vock ata . 

Syitf* a a pan* ion i • provided lor Mith a Fully 0u***r*d Bu* 
Connfc tor *l ] o» mg addi t ion a I card* to b* conntc tad lor 
larg*r *y*t*n* . E>pan*ion card* can b* I 1 1 tad to provid* upto 
IflByt* ol NON-VOLATILE RAH. Colour Draohic* 6y*t*«n«] 

Dig i tal /Ana 1 ogu* I/O artd Ouadratur* £ncod*r tr. tar I ac*». 



Th* Sing |* Board CoeWter i* availabt* in itvinl 

con I igurat ion* atartmq trt^m C230-Ba), a I losing th* OCn ua*r 
to chooie th* pric*/p*r lor ■ anc* ) ava 1 r*qu ind. 

01*0 awailabl* i* DEI-BUGB9, a poM»riul EPROn-Bavvd DEBUG 
ION I TOR which lnc ludei St agnoa tic*. Oi*k Operating Dootttrapf 
and lac ilit i«* to Uo load /Down load Motoro \ a S- Format Bina«-y 
lila* betMrm Moat and Tarq*t *y*t*ai», 

Th* m09«T9 riitro Payrloptan \ Syataa uwi th* fiinql* Board 
Coaoutar and i* a lully oackaQaa ttinrj a Ion* *y*t**» Mith two 
9 .29 inch ilfublf di*k drivp*. and anhancad PLC* dav*tcP«rn t 
•ol twar*. 



For fur th*r in foraation p |*a»* COnticH 

Rog*r Shingltr at OOHINIC fV*t*S IlaDuSTMlLB cai WTT2 anft.l, 
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68 Micro Journal - 10th Year Reader Survey 



As has been our practice in the past, we are again seeking your answers to a few questions. This time 
we are attempting to make it simpler. All you have to do is fill out and remove this page, fold in half, staple 
or tape, and drop in the mail box. You won't damage any regular material as both sides are related to this 
survey. We would appreciate your signing the form, but that isn't required. We are more interested in what 
you actually think. 

After 10 years we would like to know what you think about our performance. Also we want to know what 
you think about the performance of any of our present or past advertisers you might have had dealings with. 
Your replies will give us direction on what we might consider in our planning for the future. 

As to your replies, we would like to know the "Good - Bad & the Ugly". If we don't have your input 
we can't fulfill our pledges made to you over the years. Please take a little time and let us know. 

Again what we want to find out is how - "ALL OF US - PAST & PRESENT" - have delivered as we 
promised, not only now, but for the entire time you have been a subscriber, or when you first purchased 
anything from any of our present or past advertisers. 

Please complete and return within 30 days - thanks 

What I like or dislike about 68 Micro Journal: 



For the llama below, article ooukJ be column, uae additional paper II neceaaary 

My favoiite author: Article or Column: Date 

The best article ever: Why: Date 

The best advertiser I had dealings with: _ Item 

Why I rate them best: = 



The worse advertiser I had dealings with: . .Item 

Why I rate them worse: 



Any additional remarks: 



Name: Date 
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A PL/9 interface for 



by Martin C. Crcgoric 
lOSoikn Mod 
Harto*. Ciwa U.K. 



ISAM 



ContiiUMd From Last Month 



•10 

• ]1 

• 11 

• 13 

• 2J 

•13 

• 14 



Polntor to racnrd buffar 
racnrd langth <cooy of •2«l 

Laat raply coda raturnad by ISAM 

ISAM rill ndnbar «■ a 14 bit unaignad nunbar 

ISAM flla nana atrlng. vp to 14 bytaa plua final null 

Xay langth In Dytaa 41 • 16 bit unaignad nunbar Ithla la 
uaad by obtain to aaa If tna racord raquaatad la tha ana 
raturnad) . 

rlla alia In raoorda aa a 1c bit untlgnad nunbar 

Racord alia In bytaa aa a 14 bit unaLgnad nunbar 



LABEL - ISA* taat progran 

aTlltan by Martin Craqorlo. January 1947 
1 aadlara Hajid 
Harlow. Xaaax. U.K. 



orlgln-JJMOj 
■ lac*-*; 

ljicluda nlnlo; 
l nrl iinn anvlron; 
Inrrurf* laaav 

byta halo -\n\n 

LABEL progran c 



/• aaa DfSHAME artlda •/ 
/• —» P1IKAME artlcla •/ 



- 



OHM CLCBE CnEATaAn 

riajT LAST STAaTTVn 

BT OtluaalVn 

inarr cvwoarr racviovsvn 
aw delete ux»CA«i>s\n 
no urr imTiAtin\fi 

Vn" ; 

prucndUra raaOay |byta .tay)t 
prlnil"\nKny i "U 
input I. Hay. 10 1 1 

aialprooj 

procadurn cloarraclbyta .hand, .atraat.. city, .alp) ; 
iuIj atrant-nuli city-mil; tlp-nuli 



procndura lnputraclbyta .nana. .atraat. .city. . alp) ; 
prlntl'VnHana "I I Input. ( .nana , 30) j 

prlnt<*\n*traat «) j Input I . atraat. 30) i 

prlntl"\nclty -|i Input I, city, 30).- 

print!" Up"); Input I tip, 10) i crin 

aiajproc; 

prooodura anowrac (byta .naaia.. atraat. .city, .ilpl; 
print 1-VnW ana ■» I print I .nana) i 

print l*\notr»at •) J print (. atraat ) 

print I'Vnclty •)# print l , city) i 

prlirtl- Up ") : print!. rlpl? crifl 

in laaaiii I ■ Hat raoorda I Intagar .Icb: 

byta -nana, . atraat, .city, . tip) 
obtalni Ice. .llrat. .nana); 
•Mia dbatatuat.lcbl-g 
bwgln 

anowrael.naan. .atraat. .city. . ilpl 
obtalni. Ice. nun.ivaaal; 



byta raaida -«".«0r'. "CL-. -at-.-f I". "LA". "JT-. "ca-,»af, 
»W". "Cira.-rA". "AD-, T«-. •«". -lb*. "LI ". 



paooadura labali 
byta IcbliO). 

fUa(>4l.craaaand 1141 . Hay CJll I 
Intagar alia, racal la.cno.l : 
byta naiaa 131). atraat 111 I. dtylll l.alpll 111 
print l.halpK 

claarracl .nana .. atraat, .city, . ilpl* 
npaat 

print | a \n\ntntar eraaaand ") ; 



Input!. aamd.lDr 

eraaaand l3)-*muitr; 
touppnr | . eraaaand 1 1 

eno**3i 



If aquau.r aaii «3, .rjandalll) 

.Or agualCa-, .cnnda(l) I than bxtalt; 
1-iOl 

foravar; 
If cno 

caaa than print I .nalpl ; 
caaa 1 than /• aeu* •/ 

ba«in 

print l fl \ncntar rlla nana N l; input (. 1 11a, ill: erlt: 
r*adyl.lcb,g,.flla. )04.30|| 
and: 
caaa 2 than flnlahl .!<*); /• CU3U •/ 
caaa 3 than /• CXEATE •/ 

Bagln 

print (-VnEntar flla nana m ) : Input t. rlla, IS); 
print f-VnJ*o of raoorda **); olra-inputint; ctit; 
fornat l.lob.O. . flla. alba. 104.301 ; 
and; 
caaa ^ than poaltlon I .icb. t Iratl /* FIRST •! 

caaa 3 than poaltlon (. Icb. . laatl: /• LAST •/ 

caaa 4 than /■ START ■/ 

bagln 

taadxayf.hay); 
poaltlon (. Icb. . bay) I 
and; 
caaa 7 than /• ™T •/ 

bagln 

raadkay < . hay) j 
obtalni. icb, .toy. .nana I; 
ahowracl .nana. . atraat. .city, .lip); 
and; 
caaa * than /■ otAace •/ 

bagln 

lnpuvael.nana. .atraat, .city, .tip 
aodlryl.lcb. .nanal j 
and; 
caaa a than /• ICKT •/ 

bagln 

obtalni, Icb, .nast, .nMmmit 
ahou rac ( . nana , . atraat, .city, . alpl. + 
and; 
caaa 10 than /• CWIjrr •/ 

bagln 

obtalni. icb, .currant. .nana) i 
anour act. nana, .atraat. .city. . rip); 
and i 
caaa 11 than /• pa/jvirajs •/ 

bagln 

obtalni. Icb, .pravloua, .nana) I 
a) low r act .nana, .atraat. .city, .lip) ; 
and: 
caaa 11 than /• ADO •/ 

bagln 

Inputrac I . nana . . atraat, .city, rip) 
ttorol. Icb, .nana): 
and: 
caaa 13 than araaal.lcb): /• 0CLC7T. •/ 

caaa 14 than raoroani aat . icb); /• RfrjacAa [SE •/ 

caaa IS than abort!. lob); /• INITIALISE •/ 

caaa 14 than llat_racordal. Icb, .nana, .atraat, .city, .ilpli 
caaa 17 than prlnt("\n Run andad-l: 

alaa 

prlntl"\n i»u)t77")( 

if dbatatual.lcbl .and cno .and cnrxifi than 
bagln 

print ("\noa orror *li prlntint (dbat atual.lcb)) t erlf: 

a."ui")i 



HAM lSMCDX 

lIAH.Oe 1KTEATACE TEJTEE 

MtlTTOt BT KAATH orECOUl, JAnUAAr 1M7 
10 JADLEM MEAD 
ltA»UJ». lUEZ. U.K. 

EOUATII 

TESI OCOC BAn 

BASE ECU JMO0 
KAKTCP BCV BAJE-1 
Ptr* ECU RAHTCV-4 
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* Flu anlry poLnti 
■ 

MMOa sou »cd03 ruac tun staat 
nrnm sag tarn nn cmmcri 
raur sou KD2« at/if 
ovtdjx tat #cro» o/r obcwai. amw 
cvtiob ZQu laoc o/r hu sm 

OVTM« BQU 4CD4S Oft 4 HU MC1TS 

• 

• TUT DMA JTHOCTUM! 

■ 

aw 



I1TOI FOB VIUK.2 
FIB SMC. 2 

res srii^p.n 
rue arac.2 

K.2 



inc rue »o 
sera ma z 

srinvo ne i 

iriLsr rcc •i.TB»Trim.i3* , .o.o 

3KUM FDD 17 

irizH ns 1OO0 
res 
ium rcc 'co'.o 



rcc 'ran HOLDIH' 

rcc 'C ur to io> 

FCC 'BTTra BKTJ1' 

FCC *NC HERS -»',0 



START or TtSTIKO CQOC 



L13TW LOX ttOCl PP.1HT KEADIP. 14HW) 

jsd rsmw 

uw we cat papam roixrea 

I«ll O.T 

LDO M PATUM 

JSA WOK 

Lin o,u 

ED) 14 MO PAAAK 

CIA » 

j» cvttjec nut WHB» 

U LOT rfTJ! 
LEW 4»T 
LCD tl PAPAM 1 
iS» KKH 

LDX 0.U COpKpID 
■BO L2 
JM PSTWIC 
L2 LOT PPTR 
LZAU t.I 
LCD 12 rAXA* 2 

jmi mm 

LDX O.V riLC MM 
BBS U 
jw rarftHp 

U LOT PPTP. 
LEAD 12. T PAHAWTtA 3 
LLC »3 
JSP. tan* 
LDX 0.U I 

no u 
cut s 

JSP. OVT0B 
14 U» WTO 
LIAU lt.T 1 
LDD 14 

J» HDOP. 

ldx o.o pllk site 

CLE B 

jsp. o/rc*x 

Li LOY PPIK 
LSAU ».» PARAHS.TW » 
LEO #5 
JSA HOI 

LDX 0.U I 



S1I 



U LDX IRSCS 
JM MTWC 
LDO 1123 CJOm COT* 

no rrm pxtvnsd 
m 

• rnjuw roitrTfa details 
i 

adda ldx (hsgi 
Jja pstwk 

PSK9 A.» 
LEAK O.J 
CLR B 



hi cxmxc pwuwtm iwj 

PUL* A,B 

lox Haa 

JSH rsnw 

LAVUt CD 

JB« OVTAm KltKTXA TO PARAPET** 

ISA W 



LXAX 2.U 

a> b 

js» amis LCXDTM or paaamtih 

LOX PKSC4 
JIB rSTPXC 



FSTflXC LDA o.x> 



j» rvrne 

SAA rsTRTC 

PPJC UTS 



rcc 
res 
rcc 

MSC2 

rcc 

MSC3 
K3C4 

uses 
rcc 



res soa.sod 

'I&AIOIPI Nrutfei ir 
• OA. WD 

res *0A. too 
'ririMttr ', 

rcc ■ jt ',o 
rcc ■ :".0 
res ioa.ioo 



res ISA. mo. o 
• nnt TrjTtna ektut code 

TT LDX «5T»UCT 
STX PPTB 
JS* LITTTJt 
JHT HMOa SACtt TO t\mx 

IMD TT 
/• ISAM. LIB - 11AM. CM) LfltHIM* orocaduTM - V. . u 

vrltcvn by rurtln cripon*. jitiwry 1911 

10 MOJlttr Hud 
ftorlow. Cas«H, U.K. 

All veibs ubp in Ibu Control Bloc* WMcA pftould tw oKUrad «p 
i 50 bytp ir«. 




ISAM f*ll cooap ■■ oonpt«ntp 



caut Ant db_p1.itup_ok*«. 

<±> atprt al ru»-u». 

dB and a? fll»-170, 

ab~iii«^ruii-i«o. 

<Ib_r«c Sot loino— 100* 
/■ 

Thp followllio «rp not xpil pt-varl*bl«» but ppocl«l oaepundp 
if^vni ii<1 »y ttulr Mah npgitlv* addrouoi. Trup kpyi viat bp 
b*low Knt! 



»l trilO: bytP tlt*t<3l,lMM3),i»>a t>l. currant III. prnloui; 

oyta lproy "or"i /• isam cxpnam) otrlngp •/ 

Byta lpfln "ci."j 

Dyta lMOt "ik"j 

Byta 1«5»>» *ri","iA-,"ire".^cu".-r»-i 

Byta lptft "IT" i 

Byta !••*! "A9», 

Byta laoal ■Dft 

byta larao *«": 

byta lpot •en" i 

y 

Bupport procedural 



f I1M call Inlaidc. 



To b« OonllniMd Naxl Month 



inapfoc lpajatlntaaarll 








cn 


U<.tlOl / 


« 


pshs 


r */ 


en 


sm. tec. ttti i 


• 


uxx 


PSPCAD */ 


en 


PtC.IMl 1 


• 


LDO 


«.S •/ 


cn 


JTO. «1C. 


• 


STD 


-4.X •/ 


ecu 


♦AD. *01l 


• 


JSA 


l.X »/ 


cm 


nt.KC.IB; 


t* 


LDX 


MUCKS V 


aw 


nc.tici 


" 


too 


-4.X ■/ 


aw 


SACIMi 


' 


LOX 


4.S */ 


ED 


ra.iii.iiii 


■ 


STD 


24.X •/ 


cm 


«J5,l20i 


■ 


ruts 


r •/ 


cn 


«»■ 


" 


ATS 
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DAISY WHEEL PRINTERS 

Quine Sprint 9 • $900 Qume Sprint S - $800 

HARD DISK 10 Megabyte Drive - Seigale 
Model #412 $275. 

3 - Dual 8" drive enclosure with power supply . New 
in box . $125 each. 

5 - Siemens 8" Disk Drive , $100 each. 

Tano Outpost II, 56K. 2 5" DSDD Drives. FLEX. 
MUMPS. $495. 

TELETYPE Model 43 PRINTER - with serial 
(RS232) interface and full ASCII keyboard . $250 
ready to run. 

SVVTPC S/09 with Motorola 128K RAM. I-MPS2. 
l.Paralell Port. MP-09CPU Card - $900 complete. 

(615) 842-4600 M-F 9AM to 5PM EST 



SVVTPC 6809 system 5709 , dual 8" drives. 8212 
terminal, 128K RAM, Okidala wide carriage with 
tractor few) . $2,000 or best offer. 
Pete Yore, P.O. Bon 384. Largo. Fl 34294-0384 
(813)462-0511 or (813)536-0018 



Have many 6800 and 6809 bare and working 
boards and manuals . Send SASE for list. 
Ron Mauceri. 2037 Dewberry Cl.. Westlike Village, 
CA 91361 



GMX 68020 Computer. Never used. 
16.7 MHz. 2 Meg Ram. floppy. 25 Meg HD. 
4 serial. 1 par. With C Uniflex OS. cl a). 
$5500 new. Only $3995. Mark Talisman. 
(714) 582-9100 or (714) 532-3466 eves. 



!!! Subscribe Now !!! 
68 MICRO JOURNAL 



Subscription Rates 
U.S.A.: I Year $24.50. 2 Years $42.50, 3 Years $64.50 
•Foreign Surface: Add $12.00 per Year to USA Price. 
•Foreign Airmail: Add $48.00 per Year to USA Price. 

•Canada & Mexico: Add $9.50 per Year to USA Price. 

•U.S. Currency Cash or Check Drawn on a USA Bank ! 



68 Micro Journal 

5900 Cassandra Smith Rd. 

FOB 849 

HUson.TN 37343 



OK, PLEASE ENTER MY SUBSCRIPTION 

Bill My: Mastercard □ VISA □ 

Card # Exp. Date 



For 



1 Year 2 Yeais 

Enclosed: $ 



3 Years 



Name 
Street 
City _ 



Slate 



Telephone 615 842-4600 
Telex 510 600-6630 



My Computer Is: 



■ - 



Zip 
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12" x 12" 

On-board power supply . . . 
only requires external 
10 VA transformer. 

5 x RS-232C serial ports. 

SCSI initiator. 

FDC controller 

Parallel printer port. 

16-bit bi-directional l/F 

Non-volatile clock calendar 

Fullybuffered busexpansion 

QUANTITY DISCOUNTS 

2- 5 less 5%, 6- 9 less 10% 
1 0-24 less 1 5%, 25-99 less 20% 
100+ less 25% 



12.5 MHz MC68020 32-bit processor and 12.5 MHz MC68881 Floating Point Coprocessor 
plus 1 Mb non-volatile, zero wait-state 100% STATIC RAM all AS STANDARD! 

Omega . . . The OEM's CHOICE 



OMEGA'12.5 

OMEGA/16.6 

OMEGA/LTX 

OMEGA/1MB 

OMEGA/SER9 

OMEGA/GRF 

OMEGA/OS9 



OMEGAw12.5MHz020 881&1 MB RAM $2750.00 

OMEGA w/16.67 MHz020 881 & 1 MB RAM $3295.00 

OMEGA 120 240 VAC Line Transformer $ 22.00 

1 megabyte additional STATIC RAM $ 895.00 

9 port RS-232C serial expansion board $ 645.00 

640 x 480x4 bits/pixel ACRTC graphics l/F $ 925.00 

OS-9/68K™ 'Professional' configured for OMEGA $ 595.00 



PRICES INDICATED INCLUDE SHIPPING AND APPLY TO U.S. CUSTOMERS ONLY 



c 



VISA/MASTER CARD ORDERS ACCEPTED 



J 



OS-9 is a trademark of Microware Systems Corporation 
NON-US. CUSTOMERS SHOULD CONTACT THE NEAREST DEALER FOR PRICE & DELIVERY INFORMATION 



NORTH & SOUTH AMERICA 



ALL OTHER ENQUIRIES 



CONTINENTAL EUROPE 



LLOYD I/O INCORPORATED 

19535 NE GLISAN 

P.O. Box 30945 

PORTLAND, OR 97230 (USA) 

TEL: (503) 666-1097 

TLX; 9103805448 LLOYD I O 



WINDRUSH MICRO SYSTEMS 
WORSTEAD LABS. 
N.WALSHAM, NORFOLK 
NR28 9SA, ENGLAND 
TEL: (0692) 404086 
TLX: 975548 WMICRO-G 



SNIJDER MICRO SYSTEMS 
SCHOOTEINDSEWEG 8a 
5756 6D Vlierden 
The NETHERLANDS 

TEL: (0)4930-11975-13666 
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LLOVD I/O. INC. • P.O. Bin MM5 - Portland, OB ¥713* • USA 
AIM.: traak Hornsea • nun 1-WMM-ltfT ■ Tetex* 10 U0S44S LLOYD 10 



The LAB 6809 helps you prototype your design in less lime, 
for less money. Easy to use and easy to modify, the LAB 6809 
is the optimal development tool lor 6809-based applica- 
tions with high performance objectives. 




Use as stand-alone Of system CPU 68B09 lumper setectaDle (or I 
or 2 MH» D 2 MHz VO without wait stales lor on- board devices 066850 
RS-232C aerial portDon-board provtskFis for additional 6850.6840. 
8821. other W3 devices HCOBUG monitor provides WD and decugr 
B*X) routines D 22 sq. In userwiiewrapafeaDBOld-olatedSS-SOoan- 
nectora comprehensive documental ion 

Put the LAS 6809 to work on your next project. $395 

5n*x*^) and hem»ng $10 tUSi. 120 (outside US) Tmn residents add sain 
tax MiBiarCara. VISA accepted Technical bulletin available on tequesl 
Oealai I 



*VTFu*wr kx*sfor 
Mreujoem crwrnots 



* 



1606 West 1 4th Street Austin. TX 78703 512/477-6809 



toatalfd Sywna World-Wide 

ovea io years of ocokaiki ouautyi 



I A Division of 

* Com/mtUr PubUihlng, Inc. 

S900 Cestandra Smith Road 
>IixaoB,Ta 37343 
Telephone 615 842-4600 
Tetex 510600-6630 



DATA-COMP 
SPECIAL 
Heavy Duty Power Supplies 

For A limited time we ana offering our HEAVY DUTY SWITCHING 
POWER SUPPLY. These are BRAND NEW units and will not last 
long. Also note that these prices are less than 1/4 the normal price 
for these high quality unit. 




StutlQJjJiU 



■xMmmi 



RStac . 110/120 nkS K (ana rfanjc) OKV 130 «mm 

Out** »Sv. Onnpi 
.]>-4i) aaa* 
»12v tOiaaa 
-ttv-OJem 



; teal cvoia (ewvery 



Each 

SPECIAL: $59.95 
2 or more 49.95 



Add: $7 50 each S/h 



MO* Battel 

Sbac 10.75 > t_2 j 123 tocaa 

Rjuef 110/229 « Imp chMsjn) Or S1 1 



♦5r . U ■ 
.IZv-241 

• 12».14i 

.12* -111 

I2». 04 i 



Motet 
Lead Raoku: AiawneSt itart drm» faror 

Baca 

SPECIAL: $49.95 
2 OR MORE 39.95 



Add: S7 JO S/H each 
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SK* DOS 

Th» Gmwr* DOS " lor 68000 •CCc*(K>m tn 

* lndu«ti.«i Ccmtro' 

* €4uc#tiQft«4 Conwtmg 

* Sc«n*tf*C Compter* 

* Nitfnftw Cruncftwtg 

* Tuinliiy Syrrmn 

* OmiM CaHmtan 

* Sin*** board ConyputMt 

* but Q*+ntm) Conwutcn 

* GrtOAiCt WwkiuMtonf 

* Om oi « *.**» Syswnt 

SK>DOS it* «in^ruMrdi«fcop««»ltng«yti«mi«rcomp^1«rturin9Motwo<«32toliCPU> 
iucfi nthi 68008. 68000.88010. «rxt 88020 11 D»WW»« (h»oaw»r 1 * hill DOS, v« l» 
timpl* ind my 1o uk and will run on tYtistmi from 32K io 16 rnettfAym. BkIun 
SKcDOS i* Mwly imptatTwnlaKi on ■ ntw uniwn wb e*H it "Trie Generic DOS" wrtikh 
illowt ptQVtml Mrrilten for on* iyili"i to bi run on many -other*. 

SK a DOS com** wrth (hri «0 comni*ndi ind (Yilvmproy *th Includ »\ * 6809 erriuUtor 
which *llowt ftBK SK « DOS io run «P0l*C*ttOn P">flr jrm»od l*rtau*gM develop*! lor 8809 
SK*OOS ind ortier lyilimi Autrnblirt, KJlfOrf, *nd hioher level lengueo* WPpwi e/e 
evetietHe U orr» ih.rd Mrty iof iw.r* vtnOo* t end chrounf* pubrie oomitn joTiwwe 

SK-OOS it eviiiabie for Sintfrrcopy or Ml*/ ults. e» well «*0EM iH^rtStno. Single cooiet 
emi $12LV linqu.re « io evitletMe lyittrml Extremely eicrecliv* OEM hc«nvn« (•rm«»r« 
•!» ev*lebJe An opiwiii Conti^rriilion Kit conceint • C*tt*ltcJ Conr*9uretion rtW*u«J 
and nwo d*i of fowrw cod* tor tvit-jm •dapution. including umrm code for * tytttrn 
monilor/dlbwg ROM and 0lh«r program, uttfwl lor MUqIl'S SK-OOS Co new lV«emt 



SK-DOS 



Star-K 



^SOFTWARE SYSTEMS CORPORATION 

'OlOXIn MT KISS0. NV 10MB IKIIIIllU 

Tltrx iiM9,t;74 



INDUSTRIAL PASCAL FOR 68000 AND 6809 

PCSK is a package that generates code tor a 6B000 series processor 
running on a 6B0OO devetopmenl system It includes ihe compiler 
assembler, linker, host debugger, target debugger, and screen edrtor, 
all integrated together and controlled by a menu driven shell program 
Source code Is included lor the runtime library and many ot the 
utilities Host operating systems supported are OS-9/6B0O0 
(Microware), POOS (Eyring Research), and VERSAdos (Motorola) 

PXK9 rs a package lhat generates code lor a 6809 processor running 
on a 68000 developmenl system Includes all ot Ihe features ol Ihe 
PCSK package above, except lor the host debugger Host operating 
system is 0S-9/68000 

I WANT IT, WHERE DO I GET IT? 

For more inloimalion on either ot these two products please contact 
Certified Software. South East Media or one of our European 
Licensees 



OEM LICENSEES 

Gespac sa. 3, chemm des 
Aulx, CH-1228 Geneva/ Plan- 
les-Ouales. Swiu TEL (022) 
713400 TLX 429989 

PEP Elektromk Sysleme 
GmbH. Am Klosterwakf 4. 
0-8950 Kaulbeuren. West 
Germany TEL (08341)8974. 
TLX 541233 

Ellec Elektronik GmbH 
Galileo-Galllel-Strasse, 6500 
Mainz 42. Posdach 65. West 
Germany TEL (06131) 
5003*,. TLX 4187273 



DISTRIBUTORS 
R C S Microsystems Ltd 
141 lubridge Road. Hampton 
Hill, Middlesex. England. TEL 
01-9792204. TLX 8951470 
Dr Rudolf Keil GmbH. Por- 
phystrasse 15. 0-6905 
Schriesheim West Germany 
TEL 062 03/6741. TLX 
465025 

Elsott AG. Zelgweg 12. 
CH-S405 Baflen-Daellwit 
Switzerland TEL 
056-833377. TLX 828275 
Byte Studio Borken. Buten- 
wall 14. D-42B0 Borken, 
West Germany TEL 
02861-2147. TLX 813343 



CERTIFIED 
SOFTWARE 
CORPORATION 



616 CAMIN0 CABALL0. NIP0M0. CA 93444 
TEL (805) 929-1395 TELEX 467013 
FAX (805) 929-1395 (MI0-8AM) 



SOFTWARE FOR 680x AND MSDOS 



SUPER SLEUTH DISASSEMBLERS 
EACH MO-FLEX 1101- OS 9 $TOO-UNIFLEX 

OBJECT-ONLY vlfllont EACH ISO-FLEX.OS?.COCO 

pniaraclivotr 1 gwdl aourcs on oHX wuh iabalt. tnclud* ir#f briar r willing 
loaerly 6*00.1. J J SB. 3 *SOJ <ariofl or ZB0SOSO5 «rm 

OB/i imai mo arocanai flex igma otnta kt wsm OS9 

COCO COS t«»i«t»lr B400.1 ! 55 B.S-MO? v««yi (.mi ZSanono 51 cW» 

NEW: M01O disassembler lir».FlEX.OSf».UIIIFlEX.O&'»-«eK.MSDOS 

CROSS-ASSEMBLERS WITH MACRO CAPABILITIES 
EACH »5r>FLEX,OS/9,UN1FLEX.MSOOS.UNIX 3/J100 ALL/5200 

SP*Crly lBOl.BWJ.eS0l WOt.Wn UW 2t ?e0.BO«aO5I.BCHS5B0IO32OO0 

makiii aott aiMralMn In C. Mtn KuOMnloM uMom NOW OJMax 

KWCM for arMWorvU WO udl. JIOO lor J. 1300 lor a« 

DEBUGaMG SIMULATORS FOR POPULAR 8-EUT MICROPROCESSORS 
EACH »7S FLEX S100.OS/9 S90-UNIFLEX 

OBJECT ONI Y nrtlon* EACH 150- COCO FLE I COCO OS 9 
IH» M »»> mMinoutn. rnOO* rXaaarrCry lanwnng .Onry adttrtg 

fOKiiy lor eaoo/i. «4|«(i», &sr». (bob osn, zta flex 
ASSEMBLER CODE TRANSLATORS FOR 6502, 6B00/T, 6803 

tmwem nvnjix us-o&t uo-uniflex 

eeoo/i k esoB * eeo* 10 owivvinri sso-tlex |7s-o*3 ibo-uniflex 

FULL-SCREEN XB ASJC PROGRAMS «nw cvm «-*u< 
AVAIL ABLE FOR FLEX, UNJFLEX. AND MSOOS 

DISPLAY GENERAtOaDOCUMENTOH 150 m *ou>t*. 125 «*hoot 

MAUfta LIST SYSTEM 1100 mourn. 150 without 

wve ntoh y tvnuunp j - x « toum. ISO withoui 

TABULA tVkSA V"»«A05MEET 110O»«aucB. 150. 



DISK AND XBASC L/TUJTY PROGRAM UtBRARY 
(50 FLEX 530-UMFLEXfMSOOS 
•rM oXA laeun. ton draetry. wmnm* man cmmcq. do m iottj. 

AripjOnoVIOrnAorjrl ol SASC pron/vn. jo^ BASC pmyrw^ Me 
nrvFLfJ vwvor9 rirA*n tori <nd ii—>iii only 



CA4CCCMTFIfrri*Blnr*1IOI«PWC<5AAM 
»100-FLEX.O5V8.UNIFLEX.MS OOS.OS"J-6SK.UNIX 
OBJECT-ONLY •onions: EACH ISO 
mor»n»Mnw<tM»mml iwoo. «• tr»ata. MOOEM7. XON XOFE. Mc 



DISKETTES & SERVICES 

5.25" DISKETTES 
EACH 10-PACK S12.50-SSSD'SSDOrDSOD 

AmoreATKTiArJt gutrwan 100»if>il«y. MfiTrv*A|*Oun,hut>maV 1 



ADOmONAL SERVICES FOR THE COMPUTING COMMUNITY 
CUSTOMIZED PROGRAMMING 

*• Mr* OMVrvm vtf & t<* proonv> n dm&***t tr lh« RWwwl or in ou 
DQdw • lor voo*li od aabrrm torn or toorwar now proOBAOm , lh» chdroa 
for lucft omrriu^ur d o u o nb upon iho n»AdlabuTy of Via rnodMcafeons 

CONTRACT PROGRAMMING 
w*wi OMta noM prggrtrm or rnoaVy IBJBJthg proo/«rrw on ■ oonr/Act Doss 
A IOMOB wo now prov«jBd lor OW NrBA> YIO/A, «>• Oorr^ulorA on whlril W4 
r^v* OJjij B PJBj crjntrod DroOrAmrnmg ndudo mod popuUr mMl OT 
mtrtrAmOm indudng IBM. BurroupM uVlHroc. HorwywH. mm PODUUU 
modMI ol nvOBroaw inoudnrj etc. 6U DO. HP. » jjt. and nyal 
POVUai brondk ol i iAimm W. n*Al«g eeOtVI. eaOB. ZBO. B5C2. 
eaooa uw\i meal apgropnaa l«nouqj«t ond opvong sr<*>m. on lyaami 
'•no^nq n u( irom largo laBmtfxaBa ■> aneM ooxt oonaotart 
rt frrr *" rrmr* 1 J u ninnQtiiirTarinir rrtrrra raiti 

CONSULTING 
waollaiawicarAffpaofb un i.a j and ajtfrwal oorauBjng ^u tjB L*wA^A-^ 

■aiiaoA*. advsa. tarans. and raaaon on any topic la ta i d id co^^avi 
01a OTawpi lor oonaugtJoti u i'Baliia ai aa upon omo:a»ralL and a na a a aa 



Computer Syitam* Contultantt, Inc. 

1454 Latla Larva, Conyara, GA 30207 

Talaphona 404-483-4570 or 1717 

Wa lake ordara at any time, but plan 
long dlacuaalona after E, II possible. 

Contact lie about catalog, dealer, discount*, and services. 
Moal programa In sourse: give computer. OS, disk alia. 
25% off multiple purchase* of same program on one order. 
VISA and MASTER CARD accepted; US funds only, please. 
Add GA sales fax (If In GA) and S% snipping. 

lUNIIFUEX an TatfX^ tronicmian OSA Mo u »»» COCO TantfiWSPOS ub»< 
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OS-9" 
User Notes 



By: Peter Dibble 

The publisher* of 68' Micro Journal are proud to sake 

available the publication of Peter Dibbles 

039 DSU WITS 



lofot 



ttlon for the 1RCUWIR to tbe PtO, 
tegular or CoCo 0S9 




Dalng OS* 
HELP, HINTS. PROBLEMS. REVIEWS, SUGGESTIONS, COMPLAINTS, 
0S9 STANDARDS, Generating a New Bootstrap, Building a 
new Syaten Disk, 0S9 Uaera Group, etc. 

Progrsa lnterfeclag to OS* 
DEVICE DESCRIPTORS, DIRECTORIES, "FORKS', PROTECTION, 
"SUSPEND STATE", "1'IPES", "IHPUT/OtTPIT SYSTEM", etc. 

Programing Languages 

Aaaeably Language Progress and Interfacing: Baslc09, C, 

Psscsl, snd Cobcl reviews, prograaa, snd uses; etc. 

Disks laclude 
■o typta* all the Source Li at logs is. Source Code snd, 
where applicable, aaaeabled or coaplled Operating 
Progress. The Source snd the Discussions In the 
Coluana can be uaed "aa la", or ai a "Starting Point" 
for developing yoar OWN aore powerful Prograas. 
Prograaa soaetlaiea use aultlple Languagea such ss s 
short Asseably Language Routine for reading a 
Directory, which la then "piped" to a Bsslc09 Routine 
for output formatting, etc. 



BOOK $9.95 

Typeaet -- w/ Source Listings 

O-Hole Punched; 8 x 11) 

Delwe Under S5.50 



FLEX™ 
USER NOTES 

By: Ronald Anderson 

The publlahera of 68 MICRO JOURNAL are proud to 
■ska available the publlcetlon of Ron Anderaon'a tUX 
03 It MOTES, In book fora. This popular aonthly column 
as been a regular feature In 68' MICRO JOURNAL SINCE 
1979. It haa earned the reapect of thousande of 
68 MICRO JOURNAL readera over the years. In fact, 
s column hss been described ss the 'Bible' for 68XX 
users, by some of the world's leading microprocessor 
prof e aalonala. The aost needed snd populsr 68XX book 
available. Over the years Ron's column haa been one of 
the aoat popular In 68 MICRO JOURNAL. And of course 
68 MICRO JOURNAL is the aost populsr 68XX aagsilne 
published. 



Listed below sre s few of the 
book snd on diskette. 



flies Included in the 



All TEXT tiles m me Doc* are on irte disks 



L0GOC1 File load program to offset memory — ASM PC 

MEMOVECl vVmwy move proojam — ASM PIC 

DUMPCl Primer dump program — uses LOGO — ASM PIC 

SUBTEST CI SiTHrtabon °* M0 ° coa ' to 6809 - **>* *" •"»'«•» —ASM 

TERM EM C2 Modem input lo dak (or oVwr port "put to disk) — ASM 

M C2 Output a ii* lo modem lot another port) — ASM 

PRINT C3 Parallel (enrXarod I printer dnver — ASM 

MOOEM C2 TTL output 10 CRT and modem (or other pod) — ASM 

SCIPKG Ct Scientific math routines — PASCAL 

U C* Min mm lor disk resident, many useful functions — ASM 

PRINT C4 Parallel pnnler dnver. without PFL AG — ASM 

SET C5 Set printer modes — ASM 

SETBAS1 CS Set printer modes — A-BA9C 

NOTE: .CI..C2, etc. -Chapter I, Chapter 2, etc. 



•♦Over 30 TEXT files Included Is ASM (ssseabler)-PASCAL- 
PIC (position Independent code) TSC BASIC-C, etc. 



All Source Listings on Disk 



1-8" SS, SD Disk - 
2-5" SS, DO Disks - 



• - - SU.95 
- - S24.95 



Book only: $7.95 + $2.50 S/H 

With disk: 5" $20.90 + $2.50 S/H 

With disk: 8" $22.90 + $2.50 S/H 
Shipping & Kindling » 30 pet Boot.SZ.30 pet Dug set 

Foreign Orden Add $4.50 Surface Mail 

orSTOO Air Mail 

If paying by check - PleaM allow 44 weds delivery 

* All Cunency in U.S. Dollars 

Continually Updated In 68 Micro Journal Monthly 

Computer Publishing Inc. 

5900 Cassandra Smith Rd. 

Hixson, TN 37343 



"FLEX la a trademark of Technical System Conaultanta 

"0S9 la a trademark of Mlcroware and Motorola 

"6rJ ' Micro Journal la a tredenerk of Coaputer Publishing Inc. 



(615) 642-4601 

Telex 5106006630 
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OS-9 



L1 UTILITY PAK— Contains all programs formerly in 
Filter kits 1 & 2, and Hacker's kit 1 plus several 
additional programs. Complete "wild card" file 
operations, copies, moves, soils, del, MACGEN shell 
command language compiler. Disassembler, Disk 
sector edit utility, newand improved editions, approx. 
40 programs, increases your productivity. Most 
programs applicable for both level I & II 6809 OS-9. 
$49.95 ($51.95) 

Call or send Self Addressed Stamped Envelope for 
catalog of software for color Computer OS-9 and other 
OS-9 systems. 

BOLD prices are CoCo OS-9 format disk, other formats 
(in parenthesis) specify format. All orders prepaid or 
COO, VISA and MasterCard accepted. Add $1.50 S&M 
on prepaid, COD actual charges added. 

SS-50C 

MEMORY LIQUIDATION SALE! 

(While Supply Lasts) 

1 MEGABYTE RAM BOARD 

Full megabyte of ram with disable options to suit any 
SS-50 6809 system. High reliability, can replace static 
ram for fraction of the cost. $399 for2 Mhz or $439 for 
2.25 Mhz board assembled, tested and fully populated. 

2 MEGABYTE RAM DISK BOARD 

RD2 2 megabytesdedicated ram disk board for SS-50 
systems. Four layer circuit board socketed for 2 
Megabytes! Special sale price of $399.00 includes only 
256k of ram installed (you add the rest), includes OS-9 
level I and II drivers for Ram disk, (note: you can re- 
boot your system without losing ram-disk contents). 
(Add $6 shipping and insurance.) 

Please call for answers to your technical questions 
concerning these products. 

D.P. Johnson, 7655 S.W. Cedarcresl St. 
Portland, OR 97223, (503) 244-8152 

(For best seivice call between 9-11 am Pacific time.) 

OS-9 Is a trademark of Microwave and Motorola Inc. 
MS-DOS Is a trademark ol Microsoft Inc. 



COMPILER EVALUATION SERVICES 

BY: Ran Andasn 

The S.E. MEDIA Division of Computer 

PubUAtog Inc. 

U offering the following SUBSCRIBER 

SERVICE: 

COMPILER COMPARISON AND EVALUATION REPORT 

Due to the constant and lipid updating and enhancement 
of numerous compilers, and the different utility, appeal, 
speed, level of communication, memory usage, etc., of 
different compilers, the following services are now being 
offered with periodic updates. 

This service, with updates, will allow you who are waiy or 
confused by the various claims of compiler vendors, an 
oppoitunity to review comparisons, comments, 
benchmarks, etc., concerning the many different 
compilers on the market, for the 6809 microcomputer. 
Thus the savings could far offset the small cost of this 
service. 

Many have purchased compilers and then discovered that 
the particular compiler purchased either is not the most 
efficient for their purposes of does not contain features 
necessary for their application. Thus the added expense 
of purchasing additional compiler(s) or not being able to 
fully utilize the advantages of high level language 
compilers becomes too expensive. 

The following COMPILERS are reviewed initially, more 
will be reviewed, compared and benchmarked as they 
become available to the author 

PASCAL C GSPL WHIMSICAL PL/9 

Initial Subscription - $39,95 

(includes 1 year updates) 
Updates for 1 year - $1430 

S.E. MEDIA - C.PJ. 

5900 Cassandra Smith Rd. 

Hixson, TN 37343 

(615) 842-4601 



Call for Software: 

68000, C, Basic09 
Sculptor 



We ore receiving calls and letteis from numerous 

[sources. Including users, business and others looking 

for OS-9 68000 software; applications, etc. 



Many of you have developed software that with 

little change could be adapted for others, if you 

are interested In selling it, please let us know. There 

Is a growing market out there now. Get In on the 

ground floor! 

If you can use additional Income and have some- 
thing that might be of Interest, call and talk to Larry 
arDon. 

S.E. MEDIA Division - CPI 



POB 849 
Hixson, TN 37343 



Telephone (615) 842-6809 
Telex (510) 600-6630 



.J 
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Stop! 

Get a 25 Mega- 
Byte Hard Disk 
practically FREE 

only l<r 

•Be Sure to Consider the 

SPECIAL MUSTANG-08/A 

10 Sale on page 7 

'This Is exactly one cent more than the price of 

the same system - with two floppies - for one cent 

more you get one floppy and a 25 MegaByte Hard Disk with the faster 

CPU board, additional serial ports and Improved clock! 
Includes Professional OS-9™ Version 2 and the $500.00 C Compiler! 

Remember - When it's over, IT'S OVER! 

We don't know how long this very, very low price can be maintained, don't miss it! 

Data-Comp Div. - CPI 

'68' Micro Journal September "87 91 



6809<>68XXX 
UniFLEX 

X-TALK 

A C-MODEM/Hardware Hookup 

Exclusive for the MUSrANG-020 mnning 
UniFLEX, is a new transfer program and cable set 
from DATA-COMP (CPI). X-TALK consist of 2 
disks and a special cable, this hook-up enables a 6809 
SWTPC UniFLEX computer to port UniFLEX files 
diiectly 10 a 68XXX UniFLEX system. 

This is the only currently available method to 
transfer files, text or otherwise, fiom a 6809 
UniFLEX system to a 68000 UniFLEX system, that 
we have seen. A must if you want to recompile or 
cross assemble your old (and valuable) source files to 
run on a 68000 UniFLEX system. GIMIX users can 
directly transfer files between a 6809 GIMIX system 
and our MUSTANG-020 68020 system, or GIMIX 
68020 system. AD SWTPC users must use some soit 
of method other than direct disk transfer. The 6809 
SWTPC UniFLEX disk format is not readable by most 
other 68000 type systems. 

The cable is specially prepared with internal 
connections to math the non-standard SWTPC SCV9 
DB25 connectors. A special SWPTC + cable and 
software is also available, at the same piice. Orders 
must specify which type SWTPC 6809 UniFLEX 
system they intend to transfer from or to. 

The X-TALK software is furnished on two 
disks. One 8" disk containing the 6809 software and 
one 5" disk containing the 68XXX software. These 
programs are also complete MODEM programs and 
can be used as such, including X on X-off, and all the 
other features you would expect from a full modem 
program. 

X-TALK can be purchased with/without the 
special cables, however, this SPECIAL price is 
available only to registered MUSTANG-020 owners. 

X-TALK, w/cable $ 99.95 
X-TALK only 69.95 

X-TALK w/source $149.95 

DATA-COMP 

5900 Cassandra Smith Rd. 
Hixson.TN 37343 

Telephone 615 842-4601 
Telex 510 600-6630 

Note: Registered MUSTANG-OBO owners must (Ornish system 
serial numbor si order lo buy al nese special low pnces. 



68 MICRO JOURNAL 
Reader Service Disks 

Disk- 1 Filesort. Minical, Minicopy.Minifms, "Lifetime, 

••Poetry. "Foodlist, "Diet. 
Disk- 2 Diskedil w/ ma & fixes, Prime. •Ptmod, 

••Snoopy. ••Footbill, "Hexpawn, ••lifetime. 
Disk- 3 Cbug09. Seel. Sec2. Find. Tible2, lolexl. Disk- 
up, 'Disksave. 
Disk- 4 Mailing Progiam. •Finddit. •Change. •Testdhk. 
Disk- 5 •D1SKFDC I,»DISKF1X2, "LSTTER, 

"LOVESIGN. ••BLACKJ AX. ••BOWLING. 
Disk- 6 "Purchase Order, Index (Disk file indx). 
Disk- 7 Linking I<oader, RIoad, Harkness, 
Disk- 8 Crtcst. Lanpher (May 82). 
Disk- 9 Dalecopy, DiskfUS (Aug 82). 
Disk- 10 Home Accounting (July 82). 
Disk- It Dissembler (June 84). 
Disk- 12 Modem68 (May 84). 
Disk -13 •Initmf68. Testmf68. •Cleanup, •Dikalign. Help. 

Date.Txt. 
Disk-14 •Init, ♦Teat, •Terminal. 'Find. •Diskedil. Inii.Lib 
Disk- 1 5 Modem9 + Updates (Dec 84 Gilchrist) lo Modcn>9 

(April 84 Coram o). 
Dlsk-16 Copy.Txt. Copy. Doc, Cal.Txl, Cal.Doc. 
Disk 17 Match Utility, RATBAS, A Basic Preprocessor. 
Dlsk-18 Parse.Mod. Siae.Cmd (Sept. 85 Armstrong). CMDC 

ODE, CMD.Txl (SepL 85 Spray) 
Disk- 19 Clock. Date, Copy, Cat. PDEL Asm & Doc, 

Enors.Sys. Do, I,og.Asm & Doc. 
Dlsk-20 UNIX Like Tools (July & Sept 85 Taylor & 

Gilchiist). Dragon. C. Grep.C. LS.C, FDUMP.C. 
Dlsk-21 Utilities & Games • Date, Life, Madness, Touch, 

Goblin, Slarshot, & 15 more. 
Dlsk-22 Read CPM & Noo-FLEX Disks. Fraser May 1984. 
Dlsk-23 ISAM. Indexed Sequential file Accessing Methods, 

Condon Nov. 1985. Extensible Table Driven. Lin 

guage Recognition Utility, Anderson Marchl986. 
Disk -2 4 68' Micro Journal Index of Ailicles & Bit Bucket 

Items from 1979 - 1985. John Current. 
Dlsk-25 KERMIT for FLEX derived from the UNIX ver. Buig 

Feb. 1986. (2)-5" Disks or (l)-8" Disk. 
Disk- 2 6 Compacla UniBotrd review, code & diagram, 

Burlison March '86. 
D I s k - 2 7 ROTABIT.TXr. SUMSTE5T TXr. COND ATATXI - , 

BADMEN.TXr. 
Disk 28 Cr-82 Emulator, bit mapped. 
Dlsk-29 "Star Tick 

Dlsk-30 Simple Winchester, Dec'86 Green. 
Dlsk-31 ••• Read/Write MS/PC.DOS (SK»DOS) 
Disk -32 Hier-UNIX Type upgrade - 68MJ 2/87 



NOTE: 

This is a leader service ONLYI No Warranty is offend or implied, 
liiey are as received by 68' Micro Journal, and are for reader 
convenience ONLY (some MAY include fixes or palclics). Also 6800 
and 6809 programs arc mixed, as each is faiily simple (mostly) lo 
convert to the ether. Software a available to cross -assemble all 

* Denotes 6800 - ** Denotes BASIC 
••• Denotes 68000 - 6809 no indicator. 



Specify 8" disk $19.50 
5" disk $16.95 



Add S/H - S3 30 
Overseas add: $4.50 surface - J7.00 Air Mai), USA Dollars 

68 MICRO JOURNAL 

PO Box 849 

Hixson, TN 37343 

615 842^600 - Telex 510 600-6630 
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6809/68008 SINGLE BOARD COMPUTERS 

The Peripheral Technology Family of Single Board Computers is a Low-Cost Group Which 

Ranges From an Entry Level 8-Bit Version to a Powerful 68008-Based Board. A Product is 

Available to Fit Almost Every User's Requirements. 



FT69-5 

• 6B09 Processor/2MHZ 
Clock 

• 4 RS-232 Serial Pons 

• 2 8-Bit Parallel Porta 

• 4K-16K EPROM/60K Ram 

• Parallel Printer Interface 

• DS/DD Controller lor 35-80 

■ Track Drives Ranging From 
SS/SD-DS/DD 

• Winchester Interface Port 

Price: $31500 



PT69-3 

• 6809 t MHZ Processor 

• 2 RS-232 Serial Pons 

• 2 8-Bit Parallel Ports 

• 4K EPROM/59K User Ram 

• DS/DD Controller lor 35-80 
Track Drives Ranging From 
SS/SD-DS/DD 

Pries: $249.95 
OS9 L1 For 
PT69 BOARDS $200 00 
SK'DOS $49 95 



PT68K-1A 

. MCS800B12 5MHZ 
Processor 

. 768K RAM/64K EPROM 

• 4 RS-232 Serial Ports 

• Winchester Interface Porl 

' Floppy Disk Controfer for 
4 5*' Olives 

• 2 B-Bit Parallel Ports 

BOARD: $499.00 

with Professional OS9: $895.00 

with SK'DOS: $S9S.O0 




PERIPHERAL TECHNOLOGY 

1480 Terrell Mill Road, Suite 870 

Marietta, Georgia 30067 

(404) 984-0742 Telex # 880584 

VISA/MASTERCARD/CHECK/C.O.D. 






~OS9 II A Trademark Ol Microwarc and Motorola 



Send For Catalogue For Complete Information On All Products 



XDMS-IV 

Data Management System 
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Save $100.00 - Umrted Time 
Regular $35O.OO.Jl0w"ORry 

$249.95 



l.nrn,i. .' Mh phone assistance! Td ♦14-M1 Uf2 (Erenlnp) 

EX"" Tacnical Systems Consul la nu, SK-DOS™ STAB. KITS Corp. 



FOR 6809 FLEX-SK-DOS(5/8") 



e! Up to 10M bye 



Via 



\ 



Up id H fr*q*ITwMi par recordl Up to 12 diutm filed i 

defined nan too pan! anmll nva fQcsl Fann filesl Candioonal -•—*■—' Pwui 
cbsHeagl UvarsreyDrjtrn mid file tinkswJ File j™amgl Random file rtmul pagWgl Built in 
Militia) Buik is ceil line adjust Hilly ration oriental I enhanced fosntl Boldface. Double 
width. Italics end Underline supported! Written in ctenpaa rmnctuml •urmblcrt InqnM for 
PASTosAcutiont 

XDMS-IV Data Muugnui t Systran 

XDMS-IV It ■ bund new approach to data management It ox only permits luen to 
eiaecrsV. entar and mriew data, but also to process entire fEt* producing aae^kmnac) «****», 
ecrnen displays tad file output, Proconui g car. consist of any of i act </ mndud high level 
function* including record end field l e l ec t ia w. toning end aggregation, lookup* in other file*, 
apneisl prnoaeting of res*** coheoa. cueum rcpurt frannaning, totaling arid aofceotaling, and 
preeBXJDcD of up to three reload files a* a " r li rtl i asw * en uaer defined oaeput rrporK. 
rOWERFUL COMMANDS! 

XDMS-IV cxenbfnca the noieaeoali ly of many popular DBMS eoflwa/e tyooms with a new eaiy 
10 uae command act into a tingle ifltogralod package. We've included many new feature* and 
ceaumaada nirh i mn g a act of general file uri Hiiro The processing otodm* arelnput-PnxHa- 
Output (IPO) aaocacd which. «1U^ efrrocae ^1 ■„jfa—ni»- of a prnosat derogn. 
SESSION ORIENTED) 
XDMS-IV ia teseion Oriented. Eater "XDMS" and you ere in instant crxflmtlld of all the 
features. No more wairmg for a cosnmand to load in from dukl Manycaammandaareirmneditlc. 
eucfa aa CREATE (file deeoinoeX UPDATE (file editor). PURGE and DELETE (uuluies). 
Odasra are pvooma ,^-w^*,*. emich are weed to ante a later praseam arnica is taacutpd with a 
RUN enmmaod. Either maybe eracrad into a *proraee " file wojch ta eaecvaed by an EXECUTii 
ctatcanont. rWceeoa may oaerute other procnaea, or thomaelvei, either conditionally or 
uracnmlirinnaAly . Menu and acTcm prempta tn easily onuet. and entire uaer appbeaonna can be 
run armnoul ever having XDMS- IV) 
ITS EASY TO WE 

XDMSIVkecaiadaurnanagTziuxx rimctel Rather than desgn a otarailei DBMS which aides the 
true nature of the data, we kept XDMS-IV fDe oriented. The user view of data icladnuhipa is 
proscEuod inrepnrta ■adacreDn output, wlole the actual data nsiJes in easy to maouaifl files. Thi* 
■^— ■* pcrnua cats ■"'' ■■t 1 1 1 lairire* and reports wileoux coroples roarswiiriorj of the data bate 
files tad aouaurc. XDMS-IV may be used for a wide range of application* from aenpfc rawrd 
uxarugmsxi t ayaxoma (tddresaea, invenory ...) u> integrated database syalams (order eotry. 
Hcoureing . .)• The eoa«a> Oitiea are te^Miad... 

Vtsa ft Master Card Excepted 

Tclepbone: 615-842-4601 or Telex: 510 600-6630 
Or Write: S.E. Media, 5900 Cassandra Smith Rtt, 
Htxaoa, Tenn. 37343 
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IT^^O jT inC, 1337 WEST 37th PLACE 

GMX HIOW 20 PRICE LIST 

MICRO 20 (12.5 MHz) U/l SAB $2565.00 

MICRO 20 116.67 Iflz) U/l SAB 12895.00 

MICRO 20 (20 MHz) U/l SAB *3295.00 

OPTIONAL PARTS AHD ACCESSORIES 

68881RC12 $ 295.00 

68881RC16 $ 395.00 

MOTOROLA 68020 USERS MANUAL ♦ 18.00 

MOTOROLA 68881 USERS MANUAL » 18.00 

SBC flOCESSHY PACKAGE (K20-AP) 11690.00 

The package includes a PC-style cabinet with a 
c us tot, backpanel a Xebec 1410ft hard disk control- 
ler, a 25 Megabyte (unforaatted) hard disk, a 
5 1/4* DSHD §0 track floppy disk drive, a 150 watt 
power supply, cooling fan, panel counted reset and 
abort switches and all necessary internal cabling 

BACK PANE. PLATE (BPP-PC) For Above * 44.00 

2nd 5*80 FLOPPV I CABLES FOR R20-A9, ADO.. I 250.00 

SECOND 25MB HARD 01 SK i CABLES, ADO < 780.00 

TO SUBSTITUTE 85MB HD FDR 25MB HD, ADO.... $1800.00 

I/O EXPANSION BOARDS 

16 PORT SERIAL CARD ONLY (S8C-16S) »335.00 

The SBC-16S extends the I/O capabilities of the 
GMX Micro-20 68020 Single-board Computer by adding 
sixteen asynchronous serial I/O ports. By using 
too SBC-16S boards, a total of thirty-six serial 
ports are possible. 

RS232 Adapter (SAB- 25, SAB-90 or RJ-45) 1165.00 

The board provides level-shifting between TTL 
level and standard R5-232 signal levels for up to 
4 serial I/O ports. 

60 LINE PARAUa 1/0 CARD (SBC-60P) *398.00 

The GMX SBC-60P uses three 68230 Parallel Inter- 
face/Tiaers (PI/Ts) to provide up to forty-eight 
parallel I/O lines. The I/O lines are buffered in 
six groups of eight lines each, with separate buf- 
fer direction control for each group. Buffer 
direction can be fixed by hardware juapers, or can 
be software programmable for bidirectional applica- 
tions. 

PROTOTYPING BOARD (SBC-UH1 »75.00 

The SBC -WW provides a weans of developing and 
testing custow I/O interface designs for the GMX 
Micro-20 68020 Single-board Computer. The board 
provides areas for both DIP (Dual Inline Package) 
and PGA (Pin Grid Array) devices, and a pre-wired 
aeaory area for up to 512K bytes of dynaaic RAM. 

1/0 BUS ADAPTER (SBC-BA) »195.00 

The SBC-BA provides an interface between the GMX 
Micro-20 68020 Single-board Computer and the 
Motorola Input/Output Channel (I/O bus). Uith the 
I/O bus, up to sixteen off-the-shelf or custoa 
peripheral devices (I/O aodules) can be connected 
to the GMX Micro-20. 

ARCNET LAN board w/o Software (SBC -AN).. ..$475.00 

The SBC -AN provides an interface between the 
GMX Micro- 20 68020 Single-board Coaputer and the 
ARCNET aodified token-passing Local Area Network 
(LAN) originally developed by Datapoint Corp. The 
ARCNET is a baseband network with a data trans- 
aission rate of 2. 5 Megabits/second. The standard 
transaission aedia is a single 93 ona RG-62/U 
coaxial cable. Fiber optic versions are available 
as an option. 

0S9 LAN Software Drivers for SBC-AN » 120.00 
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GMX MICRO 20 SOFTWARE 

020 BUG UPDATE - PROMS t> MANUAL $ 150.00 

THESE 68020 OPERATING SYSTEMS ARE PRICED WHEN PUR- 
CHASED UITH THE MICRO-20. PLEASE ADD (150.00 IF 
PURCHASED LATER FOR THE UPDATED PROMS AND MANUALS. 

0S9 

0S9/68020 PROFESSIONAL PAK $ 850.00 

Includes O.S. "C" EDITOR. ASSENfLER, (EBUDGER, 
development utilities, 66881 support. 
Other Software for OS-9/68020 

BASIC (included in PERSONAL PAK) * 200.00 

C COMPILER (included in PROFESS 1 ONA). PAK).$ 500.00 
PASCAL COMPILER $ 500.00 

UNIFLEX 

UniFLEX (when ordered with Board) * 450.00 

UniFLEX UITH REAL-Tirt ENHATGKFjrTS $1000.00 

Other Software for UniFLEX 

UniFLEX BASIC M/PRECOMPILER $ 300.00 

UniFlEX C COMPILER $ 350.00 

UniFLEX COBOL COMPILER $ 750.00 

UniFLEX SCREW EDITOR $ 150.00 

UniFLEX TEXT PROCESSOR $ 200.00 

UniFLEX SORT/MERGE PACKAGE $ 200.00 

UniFLEX VSAM MODULE $ 100.00 

UniFlEX UTILITIK PACKAGE I $ 200.00 

UniFLEX PARTIAL SOURCE LICENSE $1000.00 

GMX EXCLUSIVE VERSIONS, CUSTOMIZED FOR THE MICRO-20, 
OF THE BELOW LANGUAGES AND 9FTVARE ARE ALSO AVAIL- 
ABLE FROM GMX. 

ABSOn FORTRAN (UniFLEX) $1500.00 

SCUPTOR (specify UniFLEX or 0S9) $ 995.00 

FORTH (0S9) $ 595.00 

OYNACAIC (specify UniFLEX or 0S9) $ 300.00 

GMX DOES NOT GUARANTEE PERFORhACE OF ANY GMX 
SYSTEMS. BOARDS OR SOFTWARE WHEN USED UITH OTHER 
MANUFACTURES PRODUCT. 

ALL PRICES ARE F.O.B. CHICAGO 

GMX, Inc. reserves the right to change pricing, 
teras, and products specifications at any tiae 
without further notice. 

TO ORDER BY MAIL: SEND CHECK OR MONEY ORDER OR 
USE YOUR VISA OR MASTER CHARGE. Please allow 
3 weeks for personal checks to clear. U.S. 
orders add 15 handling if under $200.00. 
Foreign orders add tld handling if order is 
under $200.00. Foreign orders over $200.00 
will be shipped via Eaery Air Freight COLLECT, 
and we will charge no handling. All orders 
■ust be prepaid in U.S. funds. Please note 
that foreign checks have been taking about 8 
weeks for collection so we would advise 
wiring aoney or checks drawn on a bank account 
in the U.S. Our bank is the Continental Illinois 
National Bank of Chicago 231 S. LaSalle Street, 
Chicago, IL 60693, account nuaber 73-32033. 

CONTACT GMX FOR MORE INFORMATION ON THE ABOVE PRODUCTS 

GMX STILL SELLS G1M1X S50 BUS SYSTEMS, BOARDS t PARTS. 

CONTACT GMX FOR COMPLETE PRICE LIST. 
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Now Offenng *FLEX" (2 Versions) 
AND 'STAR-DOS PLUS+ '" 




For Otttmrtng Call 

(615)842-4600 



FROM - DATA-COMP, C.P.I. 



A Family of 100% 68XX Support Facilities 

The Folks who FIRST Put FLEX" on 

The CoCo 
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STAR DOS PLUS + 

• Functions Same as FLEX 

• Reads • writes FLEX Disk* 

• Run FLEX Programs 

• Just type: Run 'STAR DOS" 

• Over 300 utilities & programs 
to choose from 
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TSC Editor 




NOW $35.00 
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PLUS 

ALL VERSIONS OF FLEX & STAR-DOS 

+ Read-Write-Dir RS Disk 
+ Run RS Basic from Both 
+ More Free UtJities 




INCLUDE 

+ External Terminal Program 
+ Test Disk Program 
+ Disk Examine & Repair Program 
+ Memoty Examine Program 
+ Many Many More!!! 



TSC Assembler 
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NOW $35 OO 
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CoCo Disk Drive Sgsleuis 



2 TH1NLINE DOUBLE SIDiO DOUBLE DENSITY DISK DRIVES 
SYSTEM WITN FDUEE SUCI-L* .CAIINtT, 01SI OllVE CARLE. JiH 
NEW DISK CONTROLLER JP0-CP VJTH J-OOS.RS-DOS OPERATINC 
SYSTEMS. |4*«.») 

• Spiel (y What CONTROLLER You Want JAN, or RADIO SHBCX 

TMINLINE DOUBLE S1DE0 
DOUBLE DENSITY *0 TRACKS 



MK VPCSAOi 

FOR C.0,E, P, AND COCO II 
RADIO SHACK BASIC I. 2 
EAD10 SHACK DISK BASIC 1.1 



Verhjhm Diskettes 



Sinftlf Sldad Doubl« DtDtity 
Deubl* Sided Double Deoelty 



Cooli oilers 



JtN JPO-CP WITH J-0OS 
WITH J-OOS, KS-OOS 
RADIO SHACK ] . I 

RADIO SHACK Diik CONTROLLER 1.1 



Disk Di ive Ciu!>-'> 



Ceble for One Drive 
Cable for Two Drive* 





DISK OltVE CABINET POl A 
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SINGLE (WIVE 




DISK DRIVE CAEINET POl TWO 




TK1NLINE DRIVES 


} 14.00 
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} 14.00 


EPSON U-BO 




EPSON HX-70 




EPSON KX-100 


•139. 95 


ACOMoaiE* rot ifboc 


$119. *» 
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61*6 2E SEEIAL BOARD 


81*9 32K EXPAND TO I2BK 




EPSON MJ-M-UO KIIMNS 
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EPSON LX-80 ElEtONS 




TEACTOE UNITS PO« LX-BO 




CABLES 4 •THE* IHTCK/ACKS 




CALL POR PRICING 


i la.tj 




i 24. as 





I 29.95 



t 24. as 
i 24. as 



* 4».»5 

t ta.as 



B2M.9J 

•us.aj 
$»*i.*i 



JI49.95 

» s.as 



DATA-COMP 

5900 Cassandra Smith Rd 
Hixson. TN 37343 
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SHIPPING tS* 

f^:^ d ^" s .| (615)842-4600 

n(H. $2.50 'Of OtoWring 

Telex 5106006630 
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S - 50 bus / 68XX 



Board and/or Computer 

Terminals-CRTs-Printers 

Disk Drives-etc. 

REPAIRS 



NOW AVAILABLE TO ALL S5068XX USERS 
The Data Comp Division ol CPI is proud to announce the availability ol frioif 
service department facilities to 'ALL' S50 Bus and 68XX users Including all 
brands, SWTPC • GiMlX ■ SSB ■ HELIX and others, including the single board 
computers 'Please note thai kit- built components are a special case, and will 
be handled on an individual basis, il accepted 

1 II you require service, the first thing you need to do is can the number 
bo low and describe your problem and confirm a Data-Comp service & shipping 
number* This is vary important. DaSa-Comp will not accept or repair items not 
displaying this number! Also we cannol advise or help you troubleshoot on the 
telephone, wo can give you a shipping number, but NO advice! Sorry 1 

2 All service shipments must include both a minimum $4000 
estimate/repair charge and pre-paid return shipping charges (should be same 
amount you pay to ship to Data- Comp). 

3 It you desire a telephone estimate alter your repair item is received, 
include an additional $5 00 to cover long distance charges. Otherwise an 
estimate will bo mailed to you. il you requested an estimate Estimates must 
be requested Mailed estimates slow down the process considerably 
However, il repairs are not desired, alter the estimate is given, the $40 00 shall 
conslitule the estimate charge, and Ihe itom(s) will be returned unrepaired 
providing sufficient return shipping charges were included with the item to be 
serviced Please note that estimates are given in dollar amoun Is only , 

4 Data Comp service is the oldest and most experienced genoraJ 
S50V68XX service department in Ihe world We have over $100,000.00 in parts 
in stock Wo have the most complete set of service documents lor the various 
S50/68XX systems of anyone YET, WE DO NOT HAVE 
EVERYTHING! But we sure have mors than anyone else We repair about 
90% ol all items we receive Call tor additional information or shipping 
instructions 



DATA-COMP 

5900 Cassandra Smith Rd. 
Hixson.TN 37343 
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(615)842-4607 

Telex 5106006630 



